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SUMARIO 



j 

Estuvimos en Londres en la feria de AMSTRAD. Ofrece- 
mos un reportaje sobre las ultimas novedades en perif6- 
ricos, software. La esperada expansidn de 64 K para el 

464..... 


HEROES ANONIMOS 


Concluimos por fin con la interesante historia del naci- 
miento del AMSTRAD, y de sus creadores en cada una 
de sus partes: hardware, firmware, software. .... 


EN PORTA DA 


An&isis del operative CP/M. C6mo podremos utilizar esta 
poderosa herramienta que acompafia a los modelos con 
disco de AMSTRAD...... 


FIRMWARE 


De nuevo atacamos a las rutinas incorporadas en la ROM 
de los CPC. En esta ocasidn tratamos el SCREEN PACK, 
encargado de gestionar la pantalla gr&fica y de color. 


THE DEVIL'S CROWN 


Los juegos no sdlo transcurren en el espacio sideral. En 
este caso el escenario es... |9l fondo del marl Sumdrjase 
en la aventura........ ... 


iPuede un robot construir un ordenador? Sentado a los 
mandos de su AMSTRAD, podr& dirigir al pequeno CYLU 
en su dificil misidn. 


Accidn, emocidn y diversidn con este apasionante juego 
de estrategia. Compatible 464, 664 y 6128.. 
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TECLA A TECLA 
FRONTON 


iQuien no ha jugado alguna vez en una mbquina de bar 
a este juego? Tambien conocido como «Los ladrillos», as 
uno de los pioneros en juegos d@ pantalla. Hoy estb a dis- 
posicibn de nuestros lectores... 



Para lectores con paciencla y ganas de exprimirse el ce- 
rebro, ofrecemos esta verstan del conocido juego de 
Othelo...... 


AMGRAPH 


Graficos de Tarta, graficos de Barras, grbficos lineales... 
toda una amplia gama de posibilidades, incluida la de ob- 
tener copias por impresora..... 


JERGA IN FORMAT 1C A 


jLas ciencias adelantan que es una barbaridadl Y con la 
ciencia y la tecnologfa, aparecen nuevos terminos, incom- 
prensibles para el profano. Pbngase al dla en este nuevo 
lenguaje del futuro......... 
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55 
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RSX: COMAN DOS EN T EC N ICO LOR 


Un grupo de comandos que permiten obtener facilmente 
desde BASIC caracteres multicolores en la pantalla, e in- 

cluso pequehos Sprites. /U 


COMPRESOR 


Si en estos momentos acaba de realizar un precioso di- 
bujo en la pantalla de su AMSTRAD, es el momenta de 
leer este artfculo. Ahorre tiempo y espacio a la hora de sal- 
var pantallas a cinta/disco. 


AMSTRADIEZ 


Los diez mas «IN» de! panorama de juegos. Siga de cer- 
ca la renida lucha por ser el N° 1 de nuestras listas de 
bxitos... 


CURSO DE BASIC 

Segiinda leccion 


^Qub tal la primera leccibn, bien? Pues bnimo y a conti- 
nuar. Repase primero lo aprendido el mes anterior y atrb- 
vase con nuestra leccibn de hoy. 


UBROMATICA 


Tres temas interesantes hoy en esta seccibn: Hacia la in- 
teligencia artificial con AMSTRAD, Cbdigo mbquina para 
principiantes con AMSTRAD, y Ordeno y Aprendo con 
AMSTRAD, para E.G.B... 
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E ran las nueve de la maha- 
na y, frente al hotel, se iba 
formando una cola cada 
vez mds larga. Los usua- 
rios de Amstrad aguarda- 
ban impacientes el comienzo, a 
las diez, del segundo Amstrad 
Computer Show, una feria en la 
que podrian contemplar y comprar 
a buen precio los ultimos progra- 
mas, perifericos y aparatos Ams¬ 
trad. El sabado 11 de enero, a la 
diez y cinco, en el salon de expo- 
siciones del Hotel Novotel no ca- 
bia un alma. 


La expedicion de Amstrad User 
habia llegado el dia anterior, aun- 
que la niebla en Barajas provoco 
serios problemas. Paradojicamen- 
te, Londres nos recibio con un sol 
y un cielo despejado que parecfan 
mas propios de Esparia que de las 
Isias Britanicas. 

La primera feria se celebrd el 
pasado octubre, y fue un gran exi- 
to, ya que apenas habia acabado, 
y los organizadores ya tenia cu- 
biertos los stands de la segunda 
convocatoria. En efecto, habia 
grandes expectativas sobre las 
ventas de Amstrad en la campaha 
navidena, y muchos fabrieantes y 
distribuidores de hard y software 
querian estar presentes con peri¬ 
fericos y programas en el mes de 
enero, para ser los primeros en lie- 
gar al publico. 

Mas de 75 expositores, compa- 
nias de software y fabrieantes y 
distribuidores de hardware, se re- 
partian las amplias instalaciones 
del hotel. Entre las principals no- 
vedades, anunciadas poco antes 
en la prensa britanica, llamaban 
especialmente la atencidn la am- 
pliacidn de memoria anunciada 


OVEDADES 


DE 

LONDRES 


por DK'tronics. que permitiria con- 
vertir un 464 o un 664 en un 6128. 
posibilitando el uso del CP ; M Plus. 
La estreila de la feria era una pla- 
ca que permite convertir al CPC 
6128 en un compatible IBM PC, 
con todas las posibiiidades que 
ofrece, al poderse ejecutar pro¬ 
gramas MS-DOS sobre las mdqui- 


nas. Discos duros para 6128 y 
8256 completaban las posibiiida¬ 
des de convertir a estas mdquinas 
en verdaderos «monstruos», lle- 
nos de posibiiidades en el terreno 
profesional. 

Modems y dispositivos de co- 
municaciones eran otro de los fo- 
cos de atencidn, y eran pocos los 



AMisiTiftiAiq 
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stands donde no se ofrecia una 
contribuci6n en ese terreno. LJno 
de los mbs ambiciosos era el 
puesto de Northern Computers, 
con una red local orientada al mer- 
cado educativo que ofrecia gran- 
des posibilidades, al poderse co¬ 
nectar Amstrad, BBC, IBM PC, 
MSX y otras mbquinas de red lo¬ 
cal, con un servidor de red equi- 
pado con disco duro de 20 me¬ 
gabytes. El sistema levantaba ex- 
pectacion, pero bsta se enfriaba 
un poco al ver los precios del 
sistema. 

Los amantes de los graficos y 
del diseno asistido por ordenador 
tambien estaban de enhorabuena 
ya que tanto los diseiiadores de 
software como los de hardware les 
dedicaban atencion, con varios 
programas como The Animator, 
para presentar figuras en movi- 
miento, o el Draughtsman, un ex- 
celente programa de CAD/CAM a 
la medida de! usuario. Una tableta 
digitalizadora muy barata (unas 
15.000 pesetas) teniendo en cuen- 
ta los precios habituales de estos 
dispositivos. 



Una caracterlstica curiosa de la 
feria fue la presencia dominante 
de aplicaciones y material orienta- 
do directamente a aplicaciones 
«serias» (profesionaies y educati- 
vas). Los Amstrad (especialmente 
el 8256, uno de los protagonistas 
de la feria) son maquinas que van 
a un publico cada vez mbs profe- 
sional, aunque los programas de 
juegos estaban presentes en mu- 


chos de los stands de distribuido- 
res de software, con una calidad 
excelente. 

El PCW 8256 se compraba por 
docenas, sobre todo en uno de los 
expositores, que ofrecia la mbqui- 
na con la segunda unidad (de 
720K) a un precio poco mayor al 
del ordenador con un disco. El 
hermano mayor de la familia Ams¬ 
trad habla atraldo la atenci6n de 
muchas compahlas, que transfe- 
rlan o escriblan programas CP/M 
para usuarios profesionaies. 

Nuestra expedicibn recorrib arri- 
ba y abajo la feria, encontrando 
serias dificultades para abrirse 
paso entre la gente, y recogio ki¬ 
los de catalogos y fotograflas. 
Tambien aprovechamos la oca- 
sion para saludar a los editores de 
revistas para amstradictos ingle- 
ses y franceses; por cierto, estos 
ultimos nos anunciaron su feria de 
novedades que se celebrara en 
Paris a partir del 22 de febrero, y 
donde se podrb seguir viendo que 
productos de interbs aparecen 
para complementer las prestacio- 
nes del ordenador. 



LAS TARJETAS ELECT RONiCAS: EL SOFTWARE DEL FUTURO 


En el stand de Cumana pudimos 
ver la tarjeta ASTRON, una nove- 
dad muy interesante. Se trata de 
un interfaz que permite conectar 
tarjetas ROM, EPROM, EEROM y 
RAM permanente. Nos explica- 
mos: mediante ellas, cualquier 
companla de software puede co- 
mercializar, en grandes cantida- 
des, programas de cualquier tipo, 
con el aiiadido de que, si se fabri- 
can en grandes cantidades, su 
precio los harb poco atractivos de 
copiar. 

Las restantes siglas significan 
que existen otras posibilidades de 
uso, como por ejemplo almacenar 
las fichas personales de un medi¬ 
co. En una EEROM la informacibn 
es permanente, aunque se puede 
reprogramar. La version de RAM 
con pilas admite hasta cinco ahos 
de memoria que se puede usar 
como un disco, pero mucho mas 
rapida. Las capacidades oscilan 
entre 16 y 128K bytes. 



ACTUALIDAD 















HISOFT: 


□EMiE 



BDSC3 



VORTEX: 

UN VERDADERO 

REMOLINO VENIDO DE ALEMANIA 



De Alemania Occidental viene Vor¬ 
tex, y su gama de perifericos para 
Schneider (nombre por el que se co- 
noce allf al Amstrad) va a revolucionar 
el mercado profesional. Su primer pro- 
ducto anunciado, un disco duro de 
20Mbytes, lo pudimos ver en la feria a 
un precio aproximado de 70.000 pe¬ 
setas. Una Interesante novedad para 
los usuarios profesionales, que pue- 
den ahora obtener hasta 20 millones 


de caracteres de almacenamiento a 
velocidades mas que iriteresantes. 

Una ampliacidn de memoria de has¬ 
ta 512K, con una complicada logica 
de paqinacion, permite utilizar progra- 
mas compuestos de varies bloques de 
hasta 32K cada uno, compartiendo 
variables y pudiendo saltar de un ban¬ 
co a otro mediante comandos inclui- 
dos en ROM. El resto de la RAM dis- 
ponible se puede usar como buffer de 
impresora o disco virtual, o bien para 
almacenar pantallas, 

Esta misma compahia anuncio una 
tarjeta MS-DOS que debfa haber sido 
la estrella de la feria. Sin embargo 
puestos en contacto con Vortex, nos 
anunciaron que no estaba disponible 
por problemas de connpatibilidad con 
su expansion de memoria. Nos anun¬ 
ciaron asimismo que el producto esta- 
ta en funcionamiento en breve. 


MUCHOS (BUENOS) 
PROGRAMAS 


Ei cataiogo de Hisoft no incluye 
sdlo sus productos, que ya gozan de 
una muy buena reputacion como los 
mejores ensambladores y compila- 
dores de varios lenguajes para 
Spectrum y otras m^quinas, sino que 
ha adquiridos los derechos de distri 
bucion de varias otras companies 
que trabajan programas CP/M. El ca- 
talogo incluye el DEVPACBO, ver 
si6n CP/M del m&s famoso conjunto 
de ensamblador y desemsamblador 
que haya existido en m^quinas 280. 
Sus ultimos desarrollos incluyeri la 
posibilidad, en el caso del monitor 
MOM80 de interrumpir la ejecucidn 
en el -momenta que se desee, de 
buscar mnemonicos de ensambla¬ 
dor, de desemblar a disco,.. El 
GEN80 en su ultima version puede 
ser un macroensamblador que per¬ 
mite llamar macros recursivamente e 
incluir ficheros de disco. 

El nuevo catalogo permite elegir 
tambien el ensamblador M80 de Mi¬ 
crosoft, el compilador C de Hisoft o 
el de BDS o AZTEC. Los compilado- 
res e intemretes de BASIC CBASIC, 
MALLARD y NEVADA hacen facil 
elegir. Tambien el FORTRAN y el 
COBOL NEVADA completan la lista 
de lenguajes, donde tambien Micro¬ 
soft intervene con su MS-FORTRAN 
y su MS-COBOL, PRO-FORTRAN, 
Hisoft Pascal, Turbo Pascal y Pro 
Pascal hacen una lista de lenguajes 
donde resulta francamente diffcil ele¬ 
gir. Forth Modula 2, Micro-Proloq y 
PILOT... 

Hara falta todo un articulo que 
pensamos puolicar en breve, para 
analizar las alternativas de todos es- 
tos lenguajes. Mientras tanto, habra 
que fiarse de la accesibilidad de los 
paquetes de software y de la com- 
patibilidad con desarrollos anterio- 
res. 


TABLETA DIG iTA LIZA DORA 
A UN PRECIO ASEQUIBLE 


La tableta aigitalizadora Grafpad II, 
que permite el dibujo a mano y la in- 
troduccidn de datos, es la primera que 
cae (en Gran Bretana) por debajo del 
limite de las 15.000 pesetas. Algunos 
lectores se extrahariin, pero hace un 
ario era imposible encontrar una table¬ 
ta digitalizadora por menos de 50.000 
pesetas. 

Con una resoluci6n de 


1.280 x 1.024 puntos, una velocidad 
muy Interesante y un interfaz paralelo 
aa’aptado a BBC, Commodore y Ams 
trad, se trata de un instrumento util 
para dibujantes, diseiiadores y gente 
interesada en CAD/CAM. El programs 
de dibujo que se incluye permite (y lo 
vimos hacer al publico) dibujar con 
casi tanta facilidad como con lotpiz y 
papei. 



8 / Amstrad User 




























DK’TRONICS: NOVEDADES HARDWARE 


NOVEDADES DE 
DIGITAL RESEARCH 




I 
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Una pila de expansiones es lo que 
ha preparado los chicos de dk’tronics. 
Una expansion de memoria de 64K y 
otra de 256 permiten la conversion de 
uri 464 o de un 664 (al menos eso nos 
dijero) en una maquina tan potente 
como un CPC 6128, e incluso con mas 
memoria, que puede usar el CP/M 
Plus (si se dispone de una licencia de 
uso). 

Los posibles usos de la memoria ex¬ 
tra, aparte de la mejora de poder usar 
CP/M Plus con un area de programas 
de usuario de 61K, vienen dadas por 
software de conmutacidn de bancos 
analogos al bankman del 6128, para 
usar como medio de lamacenamiento 
temporal. Los precios en Londres os- 
cilaban entre las 12.000 de la expan- 
sibn de 64K y las 24 000 de la de 
256K. 

Para los usuarios que tengan mbs 
problemas con el almacenamiento en 
disco, se ofrece un «disco de silicio» 



de 256K, con software que le permite 
emular inmediatamente la unidad B (la 
C en sistemas con dos discos), para 
ganar tiempo en las operaciones de 
disce. El precio es el mismo que el de 
la ampliacion de 256K. 

Otras novedades de interes que 
amplian a oferta de perifencos ya 
existentes son el lapiz optico y el sin- 
tetizador de voz este ultimo con un 
amplificador estereo. 


MODDEM Y CONEXIONES CON SISTEMAS 
DE TELETEXT 


Entre los modem que se ofrecian, 
liamaba la atencion el equipo de Cir- 
kit formado por un Interface especifi- 



co para los Amstrad y el acoplador 
acustico de Protek Orientado a la co- 
municacion con servicios de videotex- 
to, su principal ventaja es el precio, de 
alrededor de 7.000 pesetas. Su incon-' 
veniente, que sblo soporta tasas de 
comunicacidn de 1200/74 y 
1200/1200 half duplex. 

Los programas incluidos Servian 
para la comunicacion y transferencia 
de ficheros entre usuarios y con los 
boletines electronicos. 

El modem Nightingale, comerciali- 
zado por PACE, ofrecfa unas presta- 


Digital Research no solo inventd y 
comercializo el CP/M sino que dispo¬ 
ne de un gran catalogo de productos 
para ese operativo. Entre ellos pode- 
mos resehar la aparicion de su CBA- 
SIC y del Pascal Ml +. Estos dos pro¬ 
gramas, compilador de BASIC y Pas¬ 
cal, ayudan a establecer la gama 
Amstrad como una de las mejores do- 
tadas de herramientas de desarrollo 
de programas. 

Por otra parte, DR Graph es uno de 
los programas de graficas para el pro- 
fesional mas interesantes de la gama 
CP'M, y DR Draw un programa de di- 
bujo de altas prestaciones. 

Los cuatro programas forman parte 
de la gama profesional de Digital Re¬ 
search y se presentan con una pre- 
sentacion impecable y a un precio 
asequible en Gran Bretaha. 


A 



ciones mucho mayores, pero a un pre¬ 
cio de 25.000 pesetas: se trata de un 
modem multiestandar (300/300, 
1200/75 y 1200/1200). con modos on- 
genes y respuesta, que se acopla 
electrdnicamente al teldfono y via un 
interface RS232 proporciona al Ams¬ 
trad amplias posibilidades de comuni 
cacion. F.I software incluido cubre un 
gran numero de posibilidades. 


DIGACOMp S.A. 

DISTRIBUIDORA GALLEGA DE COMPUTADORAS, S.A. 

Calle Hospital, 8 Ferrol, Tel.: (981) 35 32 43 


DELEGACION DE INDESCOMP 
PARA EL SERVICIO DE AMSTRAD y SPECTRAVIDEO 

EN GALICIA 
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La clave 


Bien, hasta ahora 
hemos contado la 
historia anterior a la 
presentation del 
CPC464. Con esta 
ultima entrega les 
relataremos los 
sucedido desde 
entonces hasta la 
fecha. 


espues de la excitacion 
que produjo el lanza- 

n miento del 464 en abril 
de 1984, el equipo de 
desarrollo se concentro 
en terminar el sistema 
de disco —que aparecio 
puntualmente en las 
tiendas en octubre de 
ese mismo ano—. Al 
tiempo que se desarro- 
llaba el trabajo en torno a 464, la in- 
dustria parecia apasionada con los 
cassettes —aunque el jefe se dio 
cuenta rapidamente de que los dis¬ 
cos iban a ser elementos punteros, 
al comparar los diez sogundos que 
llevo cargar desde disco el progra- 
ma «La Pulga», comparado con 
los seis minutos que tardaba en 
cassette—. 

mecanismo que ofrecia alguna espe- 
ranza de que Amstrad consiguiera 
un precio magico de 199 libras fue 
una oferta de Panasonic. La saga de 
los discos de tres pulgadas habla 
comenzado. 

El hecho de que las unidades de 
tres pulgadas ofrecian mucha mas 
seguridad que las configuraciones 
mas economicas de 5 pulgadas fue 
tambien un factor importante en la 
toma de decision. En ese tiempo, los 


discos de 3 1/2 pulgadas no estaban 
del todo reconocidos, y esa fragilidad 
en cuanto a posicion de mercado fue 
un motivo de preocupacion. 


Pero no es estandar 

Pero el precio no fue el unico pro- 
blema. Para un sistema de disco 
completo con sistema operativo y 
con compatibilidad total con el siste¬ 
ma de cassette, un precio de 199 li¬ 
bras era un autentico bombazo. Se 
emplearon muchas horas reflexio- 
nando sobre la oportunidad de intro- 
ducir discos de tres pulgadas en un 
mercado dominado por las unidades 
de 8, 5 1/4 y 3 1/2, y habia tantos for- 
matos diferentes dentro de este es- 
pectro que el uso de la palabra «es- 
tandar» carecia de sentido. 

Sin embargo, los discos de tres 
pulgadas tenian la ventaja de que 
eran electricamente identicos al es¬ 
tandar de 5 1/4, aunque eso era lo 
mas que podia decirse en ese mo- 
mento para inquietar al mercado de 
tres pulgadas y media. 

Algunos observadores influyentes 
dieron muestras de un alto grado de 
ignorancia comparando solamente 
capacidades. Manifestaban enton¬ 
ces que los discos de tres pulgadas 
tenian una capacidad de 250 K, 
mientras que los de tres y media 
ofrecian hasta 1 Mbyte. Bien, lecto- 
res, esa era la situaeion de todas las 
alternativas, pero los precios se ha- 
bian situado fuera de los terminos de 
referencia de Amstrad para un pro¬ 
duces de masas. Con el PCW8256 
y la erosion de costes que se produ¬ 
jo, todo esto salta a la luz, aunque 
no hay evidencia de que el profeta 
de las tres pulgadas y media se ha- 
ya comido sus palabras. 

^Quien es el 
estandar ahora? 

Amstrad ha vendido probablemen- 
te mas sistemas GP/M-80 que cual- 


quier otro fabricante de micros, y por 
eso debe ser considerado como un 
estandar. Dando otros pocos meses 
de ventas a los enormemente exito- 
sos PCW8256. CPC6128 y a la ex¬ 
pansion DD1 no habra mas argu- 
mentos en contra. 

Teniendo en cuenta la reaccion 
hacia un micro domestico con un sis¬ 
tema de disco de bajo costo, era ob- 
vio que lo que habia que hacer era 
incluir el disco dentro del ordenador, 
y extender el principio basico de 
Amstrad de reducir costes poniendo- 
lo todo en un solo modulo. 

Era, supuestamente, una tarea 
para llevar a cabo con el minimo de 
interrupciones, ya que el PCW8256 
se habia concebido en ese tiempo, y 
era el foco de mayor atencion. Sin 
embargo, Locomotive vio la oportu¬ 
nidad de adaptar el Basic al sistema 
de disco y de anadir al mismo tiem¬ 
po algunas caracteristicas extras 
que no se incluyeron en la version 
1.0 por falta de tiempo. 

El 6128 fue considerado, desde el 
principio, como un imposible, pero 
MEJ encontro eventualmente una 
manera de solucionar los problemas 
que se plantearon al intentar anadir 
64 K de RAM —Locomotive encon¬ 
tro la manera de hacer uso de ello— 
y el proyecto se completo mas rapi¬ 
damente de lo que nadie habia es- 
perado. El precio de las partes se 
vino abajo rapidamente como resul- 
tado del agitamiento que se produjo 
a principios del 85 con el sorpren- 
dente precio del 6128 (299 libras). 


Software 

Mientras tanto, el software empe- 
zo a ser abundante. La tarea original 
de convencer a las casas de soft 
para que probaran nuestros progra- 
mas se hizo mas facil durante ese 
tiempo, y algunas marcas con re- 
nombre comenzaron a aparecer. 
«Roland in Time» fue el primer me- 
ga-juego, perseguido muy de cerca 
por la conversion de «Jet Set Willy» 
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(iNo os parece todo como de una 
generacidn anterior?). 

La abundante documentacidn del 
sistema operativo fue un acicate 
para muchos programadores. El 
Pascal de HiSoft estuvo disponible 
rapidamenie para demostrar lo que 
se podia hacer con la maquina y un 
sistema operativo cuando caia en 
manos de un programador serio. 

La compania Tasman evaluo rapi- 
damente el potencial del sistema y 
produjo, en la forma de Amsword, la 
mejor implementacion de su paque- 
te TasWord Spectrum WP. animan- 
do a algunos especialistas a tratarlo 
con grandes elogios y tambien con 
algo de entusiasmo. De hecho, el 
exito del AmsWord subrayo la rele- 
vancia de un procesador de textos 
para este tipo de domesticos y tuvo 
bastante influencia en la direccion de 
nuevos productos. 

Las companias de software que 


originalmente no aceptaron la oferta 
de Amstrad empezaron a interesar- 
se al tiempo que leian los informes 
de ventas, de exportacion y situacion 
general de la empresa. Con BBC y 
Sinclair, cuyos mercados mostraban 
el comienzo de los problemas que si- 
guieron durante 1985, un buen nu- 
mero de casas de software estaban 
ahora tratando de mantener Integra 
su posicion en el mercado. 

Cada vez iba apareciendo mds y 
mejor software, y a mediados del 85 
todos los grandes estaban produ- 
ciendo nuevos titulos simultanea- 
mente en el formato del 464. 


Te lo dije... 

Dando muestras de una hospitali- 
dad fuera de lo comun, Amsoft or- 
ganizo una conferencia para escrito- 


res de software en diciembre del 84 
para estimular y para proporcionar 
informacidn general, insinuando que 
el esfuerzo que se hiciera en el de- 
sarrollo software para CP/M no que- 
daria sin recompensa. 

A pesar de eso, la introduccion del 
6128 y del 8256 parecia haber cogi- 
do a la mayorla de la gente en el lim¬ 
bo, y el innovador software de CP/M_ 

con el soporte grafico de GSX pro- ■ 
viene ahora de uno o dos sitios so- 
lamente — sobre todo de Ian Seagle 
de Software Technology—. 

Parece incuestionable la fe que la 
gente de Amstrad tiene para con su 
producto. La ruptura y debacle gene¬ 
ral del mercado de micros domesti¬ 
cos provoca, en aquellos que no es- 
tan proximos al producto, suspica- 
cias y una actitud cauta si se preten- 
de involucrarlos activamente. Quizds 
el dinamismo de Amstrad en merca¬ 
dos volatiles hace que la gente se 
muestre cautelosa de que Amstrad 
pudiera desaparecer cuando las co- 
sas fueran mal, pero lo que ellos no 
aprecian correctamente es que la ca- 
lidad de la oposicidn en el mercado 
de ordenadores no era tan alta como 
en el mercado electronico, que for¬ 
ma la columna de la experiencia de 
Amstrad. 

Para Amstrad, competir fue como 
pescar en un barril. La competencia 
ayudo generosarnente al esfuerzo 
general de la compania con sus con- 
tinuos tropiezos, que se traducian en 
precios erroneos, tacticas de creci- 
miento lento y una falta general de 
perspicacia en los negocios que fue 
el resultado de dos afios previos de 
adulacidn por parte de los medios de 
difusion. 

Contrariamente a la creencia po¬ 
pular, ni una institucion ni el amparo 
de la BBC fueron garantia de inven- 
cibilidad una vez que el muchacho 
de Hackney olfateo el triunfo. Este 
hecho produjo algo de confusion y 
sorpresa en el mercado de valores, 
lo cual vino a demostrar que todas 
las companias fabricates no esta¬ 
ban en un buen momento. No eran 
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tiempos de ofrecer grandes dividen- 
dos, asi que Amstrad establecio los 
suyos alrededor de los 85 peniques 
hasta hace muy poco. 

Sin embargo, todo ello significa 
que Amstrad parece capaz de pro- 
ducir nuevos ordenadores antes de 
que Ian Sinclair pudiera escribir so- 
bre ellos, y eso quiere decir algo. 

De nuevo en el 
hardware 

El 6128 fue, preferentemente, una 
labor de fondo, mientras que los ma- 
yores esfuerzos se estan empleando 
en el PCW8256. Este comenzo con 
la pantalla al final, pero por razones 
de diserio y tecnologfa, se eligid una 
postura mas convencional. A pesar 
de todo, el principio basico de meter 
todo lo posible en el modulo de la 
pantalla se mantuvo, y las grandes 
ventajas de su formato de 90 por 32 
aun provocan las quejas de los co- 
mercializadores de PCs, ya que el 
publico acepta gozosamente la ofer- 
ta de Amstrad en su justo valor y uti- 
lidad, en lugar de los compatibles 
IBM, que son costosos y poco poten- 
tes, y tienen pantallas con una capa- 
cidad de un 40 % menor. 

El colapso de precios de los com- 
ponentes provoco la adopcibn de 
tbcnicas «todo RAM», y aunque se 
habia considerado como posibles 
otras opciones en caso de que la RAM 
de 256 K no bajara de precio de for¬ 
ma ostensible, nofueron necesarias. 
En consecuencia, los 112 K de dis¬ 
co RAM es una de las caracteristicas 
mas utiles del sistema, ya que per- 
mite que los programas en CP/M 
simplemenie «esten» y no se gasta 
tiempo en procesos de carga adi- 
cionales. 

MEJ Electronics empleo la mayor 
parte de su tiempo desarrollando las 
matrices de puertas Idgicas y, una 
vez mas, en realizar un planning de 
trabajo. En vista de la manera en que 
se desarrollaba el software para con- 
trolar el hardware, era esencial para 


Locomotive tener una ejemplo prac¬ 
tice tan pronto como fuera posible, 
de forma que se desarrollo un com- 
plejo sistema de simulacion, mas 
aun que el del 464, ya que esta vez 
habia que utilizar menos circuitos in- 
tegrados, y no habia componentes 
como el coritrolador de pantalla 
6845. LocoScript paso varios cientos 
de fases de desarrollo. Como se tra 
taba de un producto complejo y to- 
talmente integrado, cualquier altera- 
cion, por pequeria que fuera, reque- 
ria una recopilacion complete del co- 


digo fuente. Pero con su usual aten- 
cidn a los detalles y a la calidad. la 
versidn 1.0 se hizo realidad y demos- 
tro ser mucho mas sofisticada y ca¬ 
paz de lo que nadie hubiera espera- 
do, dado el plazo de tiempo relativa- 
mente corto de que se dispuso. 

Y en caso de que usted se !o pre- 
gunte, LocoScript no fue el primer 
nombre elegido, ya que se desecha- 
ron muchos otros igualmente buenos 
y descriptivos. Piense usted que 
WordStar tampoco fue muy original, 
,i,no es cierto? 
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Problemas, problemas, problemas... 





A las duras..., y a las 

maduras 


La movida la anunciamos en nuestro 
numero de enero: Mastertronic sacaba 
programas para Amstrad a un precio ini- 
gualable. El resultado en las listas de bxi- 
tos britdnicos iue espectacular, con cin- 
co programas entre los diez primeros en 
la lista para Amstrad. 

Ahora, muy poco despuds, aparece la 
noticia de que, en la prensa britSnica, la 
hermandad de companies de software pi- 
den que se excluyan los produetos «de 
rebajas® de las listas o, al menos, que se 
hagan dos listas separadas, una para los 
produetos «de precio completo» y otra 
para las «rebajas». Mastertronics, natu- 
ralmente, ha protestado y la solucibn no 
se ha tornado todavia. La hermandad de 
fabricantes dice que, aunque los mas 
vendidos se indican por la cantidad, eso 
no da a los usuarios una idea de la cali- 
dad final del juego, o incluso del volumen 
del negocio, ya el precio es mucho me- 
nor. 

El portavoz de Mastertronics dijo que 
no crefa que tuviera sentido vender jue- 
gos a 2.500 pesetas los usuarios de ma- 
quinas que valen menos de 60.000. «Los 
precios de los juegos tienen que caer, ya 
que los precios d’e las mdquinas caen. 
Las demas casas de software van a per- 
der la batalla. Antes de incluir los juegos 
de Mastertronic en la lista, nadie crefa 
que pudieramos tener bxito. pero este 
ano hemos vendido mbs de dos millones 
de juegos». 

Por otro lado, Gallup, que es la aso- 
ciacidn que se encarga de elaborar las lis¬ 
tas, escucha a ambos contendientes, y 
espera tomar en breve una decisibn. No- 
sotros esperamos que Espana sea en bre¬ 
ve objeto de batallas parecidas, que pon- 
gan los precios de los programas a un ni- 
vel que acabe con los piratas por asfixia 
economica. 


Se trata de una maquina educativa, par¬ 
te de la linea de produetos Fischertechnik 
Computing. Estaempresa, especializada en 
cajas de construccibn, pero con una gran 
experiencia en el campo industrial, decidib 
entrar en el campo de la informatica per¬ 
sonal ofreciendo kits de montaje para usua¬ 
rios que quieran construir sus propios 
perifericos. 

El kit incluye tres elementos: en primer 
lugar el interfaz, que permite su conexion 
a Amstrad 464, 664 b 6128, Commodore 
o Apple, de manera que el ordenador pue- 


Excepto Amstrad, los fabricantes de microordenadores siguen empan- 
tanados en una grave crisis: Commodore cierra la planta britbnica, uni- 
ca donde se fabricaba el Commodore 16, para concentrar sus esfuerzos 
sobre el resto de las factorias. Y, por otro lado, Sir Clive Sinclair ha 
acabado el ano en numeros rojos. 

Los malos resultados en el mercado, junto a la bajada de la valora- 
cibn de stocks (sobre todo de QL), han hecho que Sinclair pase de unos 
beneficios de 14 millones de libras a mbs pbrdidas d* i8 millones 
paraj| ejercicio que_acabb el 31 de marza da 1985. Si lb valoracibn 
de los stocks no hubiera eambiado, Sinclair hahrfa-ganado cuatro mi¬ 
llones de libras. Se han planteado series raestrucluraclones en la em- 
presa, que le han permitido sobrevivir cuando muchos auguraban lo 
peor. 

r'or afro lado, la empresa sigue anunciando novedades. Al Sinclair 

saw 

tdnica con disco de tres pulgadas y media y CP/M. Mbs usuarios CP/M, 
lo que redundarb en programas mejores y mbs baratos para los ams- 
tradictos con disco. 



Uno de los fundadores de Electronic 
Arts, una empresa de los EE.UU. que ha 
comercializado algunos de los mejores jue¬ 
gos de Commodore y tiene un plan de lan- 


Electronics Arts busca los 


mejores juegos en Gran 
Bretana _ 

zamientos importante para Amstrad (ya he¬ 
mos hablado de su distribucion en Espana 
por DRO soft!, esta por Gran Bretana bus- 
cando juegos interesantes para el mercado 
norteamericano. 

Segun sus propias declaraciones, llevan 
ya suficiente tiempo vendiendo juegos 
made in USA en este lado del Atlbntico, y 
ya es hora de que los buenos escritores eu- 
ropeos tengan oportunidad de acceder al 
mercado norteamericano. A mas de un au- 
tor espanol le brillaran los ojos ante las po- 
sibilidades que le abrirfa una entrevista con 
Tim Mott, que asi se llama el «cazador de 
talentos». 


Un robot controlado por 


ordenador 


da controlar el robot de una forma efecti- 
va. El equipo de construccibn propiamente 
dicho sirve para construir hasta diez morn 
tajes, sin contar con la imaginacibn del 
usuario. Un rotor de antena, un semaforo, 
elevador de cargas, un plotter y un siste- 
ma de introduccibn grafica son sblo una 
parte de sus posibilidades, con un panel 
solar, un sistema de ordenacibnde piezas 
por tamano y un robot aprendiz como rea- 
lizaciones maximas. 

El sistema se complementa con el soft¬ 
ware que permite su manejo desde el or- 



denadot, que, en el caso de Amstrad, es 
accesible en cassette o diskette. 

La distribucion en Espana es de Master 
Computer, y el precio esta a la altura de las 
prestaciones: alrededor de 35.000 pesetas. 
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Nuevos 


perifbricos 


de MHT Ingenieros 


La empresa MHT Ingenieros, conoci- 
da por Ids perifbricos reali7ados para 
Spectrum y Amstrad, ha sacado recien- 
temente un interfa7 RS232 para Amstrad, 
que permits explotar al maximo la po- 
tencia de este interfa7 de comunicacio- 
nes. La unidad se acopla fecilmente al 
Bus de expansldn de los CPC, y se pue- 
de controlar ampliamente a traves de 
comandos RSX en ROM. Admite veloci- 
dades diferentes en recepcidn y trans- 
misibn, por lo que resulta muy apropia- 
do para el uso como conector para un 
modem de comunicaciones. 

Otros proyectos, alguno en muy avan- 
zado estado de desarrollo, son una am- 
pliacibn de memoria de 64K, de uso ge¬ 
neral como segundo banco de memoria 
para 464, 664 y 6128, que se podr6 usar 
tambien como memoria intermedia de 
impresora, ahorrando tiempo en la im- 
presion de listados largos. Un sintetiza- 
dor de voz con software orientado al 
idioma castellano ahorrardi los malabaris- 
mos que deben realizar ahora los usua- 
rios de este producto, con programas de 
comunicaciones pensados para el idio¬ 
ma ingles. 

A mas largo plazo, sus proyectos in- 
cluyen el desarrollo de productos que 
permitan la ccmunicacibn entre ordena- 


dores, asi como una ampliacibn de me¬ 
moria de hasta 256K, que podrb utilizar- 
se en multiples aplicaciones aunque to- 
davia no se sabe si servirb para que los 
usuarios de 664 y 464 con disco pue- 
dan ejecutar CP/M Plus. 



II Convencibn 


Indescomp 

Por segunda vez, Indescomp realiza 
una convencibn para presentar a distri- 
buidores, proveedores, prensa y publico 
en general sus resultados del aho 1985. 
asi como para lanzar su nueva estrate- 
gia de ventas para 1986. Una reunidn 
que se celebrard apenas haya salido de 
imprenta este numero. el dla 7 de febre- 
ro, y de la que esperamos dar informa- 
cibn en nuestro numero siguiente. 

Los resultados del ahos muestran un 
desbordamiento total de las previsiones 
de ventas realizadas en octubre, hace 
menos de cuatro meses, cuando se pre- 
sentb el nuevo 8256. 



— CONTABILIDAD CPC 664 y CPC 6128 . 13.900 pts 

— CONTABILIDAD CPW 8256 . 37.500 pts 

DISPONEMOS DE UN EOUIPO DE SOFTWARE A TU SERVICIO 
HACEMOS PROGRAMAS A MEDIDA 

RECUERDA, DAMOS SOLUCION A LA PEQUEfiA Y MEDIANA EMPRESA 


TORRES QUEVEDO. 34 • TEL. 967/22 7944 • 02003 ALBAGETE 
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PARA CONTROLAR 
TOTALMENTE LA MAQUINA 

El Sistema Operativo es el 
alma que le da vida a la fria 
maquina. Y, aunque esta fra- 
se resulte sabida por todo el 
mundo, se olvida con fre- 
cuencia, cuando nos referi- 
mos al BASIC y al Sistema 
Operativo, que ambos no son 
m£s que dos programas. 



I CP/M, sistema operativo 
que presentan los Amstrad, 
es un programa muy espe¬ 
cial, ya que se encarga de 
la diffci! tarea de coordinar 
todas las tareas del orde- 
nador. 

El usuario se sienta ante 
su maquina, introduce el 
disco con el operativo, aguarda un mo¬ 
menta y (hop!, aparece un mensaje de 
conextan. Suele incluir el nombre y 
verstan del CP/M (2,2 o Plus), y el fa¬ 
bricate o distribuidor (en este caso 
Amstrad). A continuactan aparece el 
numero de discos disponibles, si hay o 
no puerto serie, etc., y la memoria li- 
bre. A continuactan la ntequina nos in- 
dica con el famoso A> que espera que 
introduzcamos alguna orden. 

Este famoso mensaje se suele lla- 
mar prompt, e indica que la irtequina 
espera una orden. La ntequina ejecuta 
en ese momenta un programa llamado 
CCP (Console Command Processor) o 
Interprets de Comandos del teclado. 
Su trabajo es sencillo, aunque aburri- 
do: se trata de leer una linea de! tecla¬ 
do, ejecutar sus instrucciones y volver 
a leer otra. El CCP, o interprete de co¬ 
mandos, forma parte de la estructura 
de casi todos los sistemas operativos 
en que la relactan directa con el usua¬ 
rio sea fundamental. Las otras dos par¬ 
tes del CP/M son el BDOS y el BIOS. 



Un programa para 
facilitar las cosas 


Un sistema operativo no es ntes que 
un programa que reside en la memo¬ 
ria temporal de un ordenador desde 
que lo activamos hasta que hacemos 
RESET. Su principal caracteristica es 
que proporciona al programador un 
ntetodo estendar de acceder a los pe- 
ritericos. Asi, nuestros programas 
CP/M pueden pedirle al operativo que 
escriba una linea en la pantalla, sin te- 
ner que preocuparse de la organiza- 
ctan concreta de la pantalla en la nte- 
quina donde corren. Los sistemas ope¬ 
rativos gastan la mayor parte de su es- 
pacio en proporcionar un ntetodo efi- 
ciente de gestion de los archivos en 
disco, y por eso se llaman muchas ve- 
ces DOS (Disk Operating System). 

La segunda mision importante de un 
sistema operativo es asegurarle al 
usuario la posibilidad de introducir los 
comandos minimos para cargar un 
programa desde el teclado, averiguar 
el contenido de un disco o realizar la 
estadistica de uso del sistema. En mu- 
chos miniordenadores esta tarea se 
suele realizar por una parte del BASIC 
en ROM, pero no tiene una gran rela- 
ctan con 6ste. La parte del operativo 
que la realiza se llama CCP. 

El BDOS (Basic Disk Operating 
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FUNCIONES DEL CP/M 


Registro 

Pardmetros 

Entrada 

Sallda 

0 

RESET 

Nlng. 

Ning. 

1 

Lect. Teclado 
(CON) 

Ning. 

Car ASCII en A 

2 

Esc. Teclado 
(CON) 

ASCII en E 

Ning. 

3 

Lect. Aux. (RDR) 

Ning. 

ASCII en A 

4 

Esc. Aux. (PUN) 

ASCII en E 

Ning. 

5 

Esc. Impr. (LST) 

ASCII en E 

Nlng. 

6(1) 

E/S teclado 

ASCII en E 

Ning. 

9 

Esc. Cadena 

Si i-FF leer 
dlrec. en DE. 

ASCII en E 

10(1) 

Leer ifnea 

Cadena acaba en $ 
Dlrec. en DE 

Nlng. 

11 

Estado CON 

(DE)=long. 

Ning. 

Buffer lleno 

A-1 caracter 

15(1) 

Abrir fichero 

Dlrec. de FCB en DE 

A=Q No hay tecla 
pulsada 

0080H+32*num, en 

16 

Cerrar tich. 

FCB en DE 

direct. 

FFH si no existe flch. 
como 15 

20 (2) 

Leer registro 

FCB en DE 

a=0 correcto 

21 (2) 

Esc. registro 

FCB en DE 

a=1 EDF. Otros 
errores 

a=0 correcto 

22 (2) 

Crear flch. 

FCB en DE 

otros valores errores 
como en 15 

23(1) 

Camb. nombre 

FCB en DE 

como en 15 

(1) AAadldaa o cambiadas en 2,0 y algulentea. 


(2) Afladldaa o cambladaa en 3,1. 



System) y el BIOS (Basic Input Output 
System) son realmente el corazbn del 
sistema operative, y la clave del 6xito 
de CP/M como un est&ndar. La expli- 
cacion de su cometido resuita m-is f&- 
cil si utilizamos un mapa de memoria 
de nuestro sistema operativo (figu- 
ra 1). El mapa en el CP/M Plus es li- 
geramente distinto, ya que 6ste mane- 
ja m&s de 64 K. Pero la idea es la 
misma. 

Podemos observar que la parte baja 
de memoria (desde 0000H hasta la lo- 
calidad 256 0100H) incluye una serie 
de variables y parAmetros que nos per- 


miten la comunicacidn con el sistema. 

La localidad 0000 incluye el punto de 
entrada de RESET, y, en CP/M 2,2 y 
anteriores, vuelve a cargar el CCP y 
rei'ni'cfalfza bs discos. Es elsalto que 
se ejecuta cuando pulsamos f C. En e! 
Plus I os discos no se inicializan de 
nuevo. 

El punto de entrada para todas las 
funciones del operativo es la localidad 
5, donde por regia general se encuen- 
tra un salto hacia el BDOS. El BDOS 
es la parte estcindar del sistema ope¬ 
rativo, y el BIOS es la parte que de¬ 
pends de la m£quina, y que se debe 


escribir una vez para cada ordenador. 
Aunque el BIOS depende de la m^qui- 
na, Digital Research proporciona un 
BIOS est&ndar, junto con instrucciones 
para su modificacion «a la medida». Y 
esta no es una de las menores razo- 
nes de su dxito. 

El BDOS, como parte estandar del 
sistema, permits a los programadores 
utilizar una gran cantidad de puntos de 
entrada para acceder al sistema. Para 
los expertos en ensamblador indicare- 
mos que, para conseguir acceso a las 
funciones del CP/M hay que llamar a 
la localidad 005 con el numero de fun- 
cion a utilizar en el registro C y parci- 
metros opcionales en los registros A y 
DE. Los par^metros dependen de la 
llamada, y la tabla 2 muestra algunos 
de ellos. 


La estructura del disco 


Para poder controlar todos los par&- 
metros del disco del sistema, el opera¬ 
tivo tiene que especificar las caracte- 
rfsticas que debe reunir el directorio. 
En el CP/M se considers que los sec- 
tores tienen 128 bytes, aunque el sis¬ 
tema puede usar discos con sectores 
de 512 (los m&s corrientes) y hacer 
luego la conversion. Cada fi'chero ocu- 
pa un minimo de una entrada de direc¬ 
torio, que ocupa 32 bytes. Los discos 
tienen unas pocas pistas reservadas 
para el directorio y, si son discos «de 
sistema», para las rutinas de carga del 
operativo. Si, por ejemplo, el directorio 
permite 64 archivos, ocupara los pri- 
meros 16 sectores tras los «del sis¬ 
tema". 

Cada vez que se opera sobre un fi- 
chero o sobre su entrada de directorio, 
6sta se almacena temporalmente en 
memoria, actualiz£ndose en disco al 
acabar el proceso. Por eso es impor- 
tante que se cierren todos los ficheros 
antes de cambiar los discos. 

Los nombres de archivo deben cum- 
plir ciertas condiciones: el nombre pue- 


r 
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de incluir hasta ocho caracteres, que 
serbn convertidos a mayusculas, y una 
extensibn, separada por un punto, de 
tres letras. Algunos comandos permi- 
ten utilizar la «?» y el «*» para indicar¬ 
le al operativo que en esa posicibn vale 
cualquier letra o grupo de letras. 

La tabla de nombre de archivo tiene 
el siguiente tormato (tabla 3). Los bits 
mbs significativos de los caracteres del 
nombre y tipo de fichero se utilizan 
para marcar informacibn suplementa- 
ria, con algunos de ellos reservados 
para el sistema y otros de usuario. En 
ficheros de mas de 16 K el fichero ocu- 
pa 2, 3..., extensiones de 16 K, y, por 
tanto, esas entradas de directorio. 
Aunque existen ligeras diferencias en- 
tre las versiones de CP/M en la forma 
de tratar los ficheros, la estructura no 
muestra grandes variaciones. No hay 
que olvidar que el CP/M se ha disefia- 
do para una gran variedad de mbqui- 
nas, y que se trata de un operativo que 
ha evolucionado durante mbs de diez 
ahos. 

El CP/M Plus tiene bastantes dife¬ 
rencias con respecto a las versiones 
anteriores. Puesto que se ha construi- 
do para poder direccionar mbs de 
64 K, el BIOS estbndar no es mbs que 
una tabla de saltos que permite acce- 
der, mediante un mecanismo de pagi- 
nacibn, al programs ejecutivo, que 
estb en las «otras» 64 K. Alii se en- 
cuentra tambibn la memoria de panta- 
lla, otra de las limitaciones importantes 
del CP/M casico. En efecto, las panta- 
llas de los ordenadores evolucionaron 
desde la simple pantalla de texto, que 
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no ocupa apenas memoria, a la panta¬ 
lla grbfica del Amstrad, que se «come» 
16 K a cambio de los maravillosos grb- 
ficos que ofrece. 

Esta memoria de pantalla, en el 
CP/M 2,2, estb en la parte alta de la 
memoria, junto con el BIOS, lo que 
hace una memoria efectiva de 48 K. 
Con las 128 K y la paginacibn se dis¬ 
pone de un CP/M mbximo, con un brea 
de usuario de mbs de 61 K. 


Los comandos 
residentes 

Ya hemos dicho que, cuando apare- 
ce el «A>», el usuario puede intro¬ 
duce un comando. El interprete de 
comandos mira a ver si la palabra in- 
troducida coincide con alguno de los 
comandos internos. En ese caso lo 
ejecuta. Si no se corresponde, bus- 
ca en el disco un archivo del mismo 
nombre y de tipo COM (Comando), 
lo carga en memoria y lo ejecuta. 


tifica seguida por «:». Por ejemplo, el 
usuario de PCW 8256 puede mejorar 
mucho la velocidad de trabajo copian- 
do los comandos transitorios que usa 
al disco de memoria «M:» y luego es- 
cribiendo tras el «A>» un «M:». El sis¬ 
tema contestara «M>» y, a partir de 
ese momento, buscarb los comandos 
en el disco simulado en memoria. Otro 
comando que se puede utilizar es 
CONTROL P (abreviado P), pero 
sblo si dispone de impresora. Asi ha- 
cemos que todo lo que aparece en 
pantalla vaya tambibn a impresora. 
Una nueva pulsacibn de P desactiva 
la impresora. 


Los comandos 
de disco 

Los ficheros de disco cuya extensibn 
sea COM se consideran como coman¬ 
dos del sistema, si tecleamos «Hola», 
el ordenador busca en el disco y aca- 
ba por contestar «HOLA?». Eso quie- 



Digital Research, flrma que ha hecho el CP/M, ofrece su gama de productos para 
Amstrad. 


Los primeros comandos se llaman 
residentes , los segundos transitorios. 

Los comandos residentes son: 

ERA, que borra uno o mbs ficheros 
del disco. 

DIR, que muestra informacibn sobre 
los ficheros de usuario del disco. 

DIRS, igual que DIR para los coman¬ 
dos del sistema. 

REN, que cambia el nombre a un 
fichero. 

SAVE, que permite crear un fichero 
con el contenido de la memoria. 

TYPE, que escribe un fichero de tex¬ 
to en la pantalla. 

USER, que permite dividir el disco 
en hasta 16 zonas de usuario. 

Adembs, en sistemas de mbs de un 
disco, se puede cambiar el disco por 
defecto escribiendo la letra que lo iden- 


re decir que ha buscado el comando 
HOLA, que no es residente, en el dis¬ 
co, y que no existe un fichero HOLA, 
COM. 

El numero de ficheros transitorios 
depends de la instalacibn y de los dis¬ 
cos de utilidad de que dispongamos. 
Por ejemplo, un programs de contabi- 
lidad se puede activar como CONTA 
ya que estarb en el fichero CON- 
TA.COM. 

Otro tipo de ficheros importantes 
para el programador son los ficheros 
de comandos, que ahorran introduc'ir 
sucesivamente una serie de comandos 
del teclado. Estos ficheros tienen la ex¬ 
tensibn SUB, y se ejecutan mediante 
el comando SUBMIT. Los usuarios de 
L0G03, en CP/M Plus, pueden ejecu- 
tarlo como L0G03 (llamando al fiche- 
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Compatible con: SPECTRUM, ATARI, 
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Spectrum, Atari, Commodore, Spectravideo, Amstrad 
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propietarios. 
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FCB (Bfoque de Control de Archivos) 

Byte Nombre Contenido 

00 

ET 

Tipo de entrada. E5=libre o borrada 

On Num. de usuario 

01-08 

FN 

Ocho caracteres de nombre, con espacios a la derecha. 

09-0B 

FD 

Tipo de fichero. Los bits mOs significativos de cada byte 
sirven de indicadores de proteccibn de escritura, etc. 

OC 

EX 

Numero de extension. Cada 16K de fichero Oste ocupa una 
nueva entrada en el directorio. 

OD 


No se usa CP/M 2,2 

OE 

S2 

Es parte de la cuenta de extensiones. 

OF 

RC 

Cuenta de reglstros. Una extension puede tener hasta 128 
reglstros de 128 bytes. 

10-1F 

DM 

Mapa del Disco. Es una tabla con los bloques lOgicos que 
contienen partes del fichero. 

20 

NR 

Registro siguiente. El siguiente registro que se va a leer o 
escribir. 

21-23 


Se utilizan como puntero para el acceso directo. 





ro COM) o bien como SUBMIT 
L0G03, que ejecuta el fichero 
L0G03. SUB, que a su vez contiene 
los comandos SETKEYS KEYS. DRL 
(para reasignar el teclado para LOGO) 
y L0G03, que ejecuta el programa 
propiamente dicho. 

Muchas posibilidades, 
al precio de un poco 
de estudio 

No hemos hecho mis que subrayar 
unas pocas de las posibilidades del 
CP/M. Este operativo, pensado para 
los programadores, incluye adem4s un 
monitor de cddigo m&quina (DDT o 
SID), un editor (ED), rutinas para vol- 
car un fichero en hexadecimal 
(DUMP), etcetera. 

Una exploracibn exhaustiva de to- 
das las posibilidades agotaria el espa- 
cio de la revista, y m&s aun si dispu- 
sidramos de 61 Existen buenos libros 
sobre el tema, que comentaremos en 
un prdximo numero, y seguiremos tra- 
tando este segundo operativo, que 
puede convertirse en el alma de nues- 
tro ordenador profesional. 


SISTEMA DE ENTRADA 
Y SALIDA 

SISTEMA DE DISCO 

INTERPRETE 
DE COMANDOS 


AREA DE PROGRAMAS 
DE USUARIO 


INTERFOG ENTRE EL 
CP/M Y LOS PROGRAMAS 
DE USUARIOS 


64K FFFH 

(max) 


256 010QH 


0 OOOOH 
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Art-LLIOOSl HAfctN «OMt ! 

NUHRM-» JUI 10 

DIM LCIONI! AVOA. DC LA PAZ I 

01 Ffc.CC I ON.’ s LUGO 

lELLIONOl 939 963476 
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NOML*h £i JOSE LUIS 
DIRECCIUNUC/ ATU HA 6 • 
DIRECC10N2:ALCORCUM 
TELEFOfJO: VI 231219 
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BALANCE 


PROGESADOR BE TEXTOS 

jldeal para escribir cartas e informes! 
Caracterfsticas: Visualizacion continua del 
tiempo • Contador de palabras (indicando 
las palabras par minuto) • Texto normal o 
doble, en pantalla o impresora. 




OJA DE CALCULO 

illtiliza tu micro para controlartus cuentas! 
Caracterfsticas: Cifras visualizadas en fiias 
y columnas • Actualizacion permanente • 
Actualizacion reflejada instantaneamente 
en toda la hoja • Grabacion de los 
resultados para futures modificaciones. 




*tfo no 


Ri antro no 


AFELLlDOS* GUTIERREZ MADRID 
NOMEREi JUANA 

OlhfcCCIQNliC/ AACALA 76 
D1RCCCI0M2:BARCELONA 
TFLtFONOi VO 4322823 
F DADi 2 1 


AFElLIDQS: UBfcDA CErKI AN 
NOMBN’E: SARA 

DlhLCClONliCZ ISLA DE AROSA 3 
DIRECC 10N21 MADff 1 0 
TELEPOMOs 91 7213819 
tDADi 19 
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GRAFICOS 

iConvierte esos numeros en maravillosos 


graficos! Caracterfsticas: Graficos de barras 
en tres dimensiones • Graficos de pastel • 
Histogramas. 


BASE DE DATOS 

ilgual que los archives de la oficina! 
Caracterfsticas: Cargarficheros con solo 
pulsar una tecla • Clasificacion 
Modificacion • Listados • Busqueda 


*En Castellano 
*Servimos en 
48 Horas 


Envienos a MICRO BYTE 

P.° Castellano, 179, 1 ° - 28046 MADRID 


NomDre 


Apellidos 


*Version disco AMSTRAD P.V.P, 3.900 ptas. I Direction 


Poblocidn 


Teltiono 


I 


ii 
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INCLUYO TALON NOMINATIVO 
CONTRA-REEMBOLSO 


Pedidos por telSfono 

91 -442 54 33/44 


Deseo que me enviendH ejempiar/es 
del programa MINI OFFICE 

PARA EL MICROORDENADOR 
SENALADO 

□ AMSTRAD □ COMMODORE □ SPECTRUM 

□ AMSTRAD VERSION DISCO 
Sin gastos de envio 







































FIRMWARE 



* * + -r 

* * * * ■¥• * , 

'"*■¥• ****¥■* + ** 

«***AfL*J|L*X 

* * * 4 r 

“ *. X 


E l Amstrad incorpora, como 
muchos de vosotros ya sa- 
br6is, un procesador espe¬ 
cial para controlar el soni- 
do. Se trata del AY-3-8912, hermano 
del que llevan los MSX, y un instru¬ 
ment muy potente. Pero este circuito 
no servirA de nada sin un programa 
que le saque rendimiento. El progra¬ 
ma se llama gestor de sonido (sound 
manager), y es el tema de nuestro ca- 
pftulo de hoy. 

La salida de sonido de los CPC es 
una clavija est6reo, aunque su sonido 
es habitualmente mono por llevar un 
solo altavoz en el interior de la m&qui- 
na. Se trata de un pequeno altavoz, 



que le hace poca justicia a las posibi- 
lidades sonoras del ordenador. 

La pastilla que incorpora el Amstrad 
tiene realmente tres canales. Supo- 
ni6ndolos numerados como canal 1, 
canal 2 y canal 3, la salida al jack es- 
tereo se da como canal 1 m&s canal 
2 por la salida izquierda, y el canai 2 
y canal 3 por la salida derecha. 

No obstante las facilidades del 
Amstrad no terminan aqui siendo po- 
sible gestionar esta pastilla, accedien- 
do directamente a ella mediante co- 
mandos firmware o si se prefiere se 
puede acceder usando el software 
disponible por Locomotive. 

Vamos a estudiar superficialmente 
la funcionalidad de los parcimetros a 
introducir a nuestro Amstrad. 

Como es bien sabido el sonido no 
es m&s que una onda, por lo que re- 
sulta obvio que su comportamiento ha 
de seguir las mismas reglas de cual- 
quier movimiento armdnico. Empece- 
mos por ver la amplitud de la onda. La 
amplitud nos define realmente el volu- 
men del sonido, aunque combinando 
los diferentes parcimetros podemos 
conseguir efectos de m£s o menos vo- 
lumen. Si introducimos pues el valor 
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cero a este parbmetro estb claro que 
no vamos a oir nada. Los valores dis- 
ponibles para este parbmetro oscilan 
entre 0 y 15. La frecuencia es el nu- 
mero de veces que se repite una nota 
en la unidad especlfica de tiempo. El 
perlodo viene generado por la siguien- 
te fbrmula: 


PERIODO = 


125.000 

FRECUENCIA 


Haciendo una pequena referenda a 
la estructura de una nota musical, se 
pueden diferenciar tres fases en la 
ejecucibn de la misma, esto es: 

Fase 1: fase de crecida en la que la 
nota va «creciendo» 


Fase 2: fase de sostenida o fase en 
la cual la nota se ejecuta y mantiene. 

Fase 3: fase de decaimienio en la 
cual una vez terminada la ejecucibn 
de la nota esta todavla tarda un tiem¬ 
po en desaparecer del todo. 

Con el fin de igualar al mbximo las 
posibilidades de un instrumento de 
musica, nos estb permitido controlar la 
duracibn de las tres fases expuestas 
anteriormente. 

Potente, 
pero complejo 

La complejidad de la gestibn del so- 
nido del chip que incorporan los Ams- 
trand hace que el operativo facilite su 
programacidn mediante interrupcio- 
nes. Aunque para hacer sonar la mb- 
quina hasta proporcionarle una fre¬ 
cuencia y una duracibn, un control 
mbs completo del sonido nos obliga a 
poner en juego muchos mbs parb- 
metros. 

Pero' el estudio de todos los parb- 
metros nos llevarla un artlculo de ma¬ 
yor longitud que bste por lo que deja- 
mos el resto de los parbmetros y un 
estudio mucho mbs profundo para una 




Tabla 

Llamada 

Funcibn 

Notas 

BCA7 

Resetea el Sound Ma¬ 
nager 


BCAD 

Testea el estado de un 

A: contiene un canal segun: 


canal 

1000000 Canal A 

01000000 Canal B 

00100000 Canal C 

A: contendra en salida el estado del 
canal segun BITS significan: 

0 1 2.n.° de notas libres en el canal 

3. espera de sincronism 

Con canal A 

4. espera de sincronism 

Con canal B 

5. espera de sincronism 

Con canal C 

6. el canal esta «sostenido» 

7. el canal esta activo 

BCB3 

Libera un canal «sos- 

A contiene el canal segun cuadro an- 


tenido» 

terior 

BCB6 

Para todos los sonidos 

Retiene todos los canales pero sin 


de forma inmediata 

perder la informacibn 

BCB9 

Consigue la direccibn 

A contiene la envolvente por tanto ha 


de la envolvente de 

de ser un numero de 1 a 15. HL con- 


amplitud 

tendrb la direccibn de la envolvente de 
amplitud. BC contendrb la longitud de 
la envolvente. 

BCC5 

Consigue la direccibn 
de la envolvente de 
tone 

Segun el cuadro anterior. 

BC65 

Inicializa el cassete 
manager 


BC6B 

Activa o desactiva los 

A si cero son activados. A si uno son 


mensajes del cassette 

desactivados 

BC6E 

Activa el motor 


BC71 

Desactiva el motor 


BC77 

Abre un fichero como 

B: contiene la longitud del fichero 


input 

HL: contiene la direccibn del fichero 

DE: contiene la direccibn del buffer de 
salida 

BC7A 

Cierra un fichero 


BC80 

Lee un caracter de un 
fichero de entrada 

A: contiene el caracter leido 

BC89 

Testea el finde fichero 

Si es final Carry True 

BC8C 

Abre un fichero de sa- 
lida 

Ver cuadro de BC77 

BC95 

Escribe un caracter 

A: contiene el caracter 

BCA1 

Lee un registro del 

HL: contiene la direccibn donde dejar 


cassette 

los datos. 

DE: contiene la longitud de los datos. 

A: contiene un caracter de sincronis- 
mo segun: 

Pt2C Registro cabecera 

Ptl 6 Registro de datos 

BC9E 

Graba un reaistro 

Iqual que en cuadro anterior 

BCA4 

Verifica un registro 

Igual que en cuadro anterior. 
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A FONDO 


















\ 

Un buen lector de cabeceras es la clave de 
cualquier sistema de recuperacibn de 
informacibn en cassette. 


EJEMPLO DE GESTION DE CABECERAS 




10 

iCONVERSION 

DE UN BLOQUE 

CUALQUIERA DE UN PROGRAMA A 



20 

IBLOQUE DE CARGA DE DATOS 

0 PRIMER ELOGUE DE CARGA 

29BE 

CD18BB 

30 

INICIO: CALL 

#33 ! S 

i ESPERA UNA TECLA PARA L 

EER REGISTRO 







40 

JDE CABECERA 



29C1 

218813 

50 

LD 

HL,5000 

iPOSICION EE CARGA DE DAT 

03 EM 

MEMORIA 





29C4 

110001 

40 

LD 

DE ,254 

1LONGITUD CEL REGISTRO CA 

BECERA 





29C7 

3E2C 

70 

LD 

A, #2C 

i CARACTER DE SINCRONISMO 

PARA 

CABECERA 





2909 

CDA1BC 

SO 

CALL 

#BCAi 

i LECTL'RA DE UN REGISTRO 


29CC 3E7F 
29CE 329F13 


90 

100 

110 

120 

130 

140 

150 

140 

170 

180 


TENEMC3 EL 

REGISTRO CABECERA EN LA POSICION 50000 

LD 

A,%1111111 


LD 

(5023),A 


UN VALOR DIFERENTE DE 0 

LO CONVIERTE EN BLOGUE DE CARGA 

DISPONEMOS 

DEL REGISTRO 

MODIFICADO 


29D1 

CD1SBB 

190 

CALL 

#BB 1 8 

29D4 

218313 

200 

LD 

HL,5000 

29D7 

110CC1 

210 

LD 

DE,254 

29DA 

3E2C 

220 

LD 

A, #2C 

29DC 

CD9EBC 

230 

CALL 

#BC9E 

29DF 

C9 

240 

RET 



GABACICN EE UN REGISTRO 
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.UB 51000 
SUB 51000 
OSUB 51000 


W/OK 193001 XX XX*-I2iSCL> COSUB 51000 
7>X*20*SCL i YY-Y+20»9CL t-XV ‘ 1 
LST01E19900 < XX"XX-*"t2tSCL iCOSUI SIOOO 
:3TOREI3SOOiXX-XX-M0«SCLiCOSU& 31000 


18700 XX-XXf3lOOOOiXX-XX+424SCL 
lOQOO XX>XX+*5CLiYY-Y+20*SCL*XY 
18900 XX-X*2718900iXX-XX*42»SCL 
13000 lESTOESiaSOOiXX.XXMeJSCLi 


PERSONAL PRINTER 


RITSHM1 F+ 


NEAR LETTER QUALITY PRINTER 

COMPATIBILITY WITH MOST PERSONAL COMPUTERS 


0FFiA«M20 INTERVAL OFFtA-ASCfA»)iIF DF-ITHEKC03UBU60 16530 SOUK* ^ 

1 THEN M30 IF A®AHID THEN DX-DX-16:G0SUBlSOOiC0T014O0 16800 XY-.8iF9W 0.* , 

* THEN f«0 IF A-B.H1C THEN DX»DX« 16< C03UB 1300< GOTO MOO 18700 SCREEN 1, l : COLOF 1 :S<.~L 

I THEN HSO IF A-LHIE THEM DY-DY-Si COSUB IS30> GOTO MOO 16800 SCEEEN 2.2rC0L0R2iSCL« 1.5 = 


•RITE 

BWI 


f+: 


ESPECIFICACIONES 

1. Mbtodo de Impresibn 

Serie de impactos por matriz 
de 9x9 

2. Cabezal Impresor 

9 agujas (reemplazable) con 
expectativa de vida de 50 
millones de caracleres a 
100 % de use continuo. 

3. Velocidad de impresibn 

Impresibn a 105 cps uni o 
bi-direccional, busqueda 
lugica optimizada, capacidad 
de impresibn 45 Ipm a 10 
cpi,, 200 ms de salto de linea 
con espaciado de 1/6". 

4. Espaciado interlinea 

1/6", 1/8", 7/72 , programable 
N/72", N/216". 

5. Allmentacibn de papei 

a) Tractor ajustable entre A" 
y 10”. 

b) Alimentaeion a friccibn 
para Tiojas sueltas entie 
4' y 9,5 . 

6. Corte de papei 

Se puede imprimir desde 
principio de pbgina hasla una 
pulgada de fin de papei. 

7. Seleccibn de caracteres 

Todos los 96 caracteres 
ASCII, 96 itAlicos, 96 NLQ, 
todos ellos con correcta 
impresibn de los tra20S 
descendentes, y 9 set de 
diferentes idiomas 
seleccionables. 


Adembs con 2K buffer, 32 
caracteres definibles por 
usuario y ccn 8K buffer, 256 
caracteres definibles por 
usuario. 

8. Graflcos 

Oensidad normal 480 puntos 
por linea. doble densidad 
960, cuadruple densidad 
1920, CRY graficos 640. 
plotter grbfico 576, CRT 
grbficos 720 puntos por 
linea. 

9. Modos de Impresibn 

Standard, doble impresibn, 
enfatizado, itblica, supra y 
subindices, mitad altura y 
NLQ. 

10 Tamartos de Impresibn 

a) Normal (10 cpi) 2,1 mm 
(a) x 2,55 mm (h) 

b) Normal expandido (5 cpi) 

c) Elite (12 cpi) 

d) Elite expandido (6 cpi) 

e) Comprimido (17 cpi) 

I) Comprimido-expandido 
(8,5 cpi) 

g) Espaciado proporcional 

h) Proporcional expandido. 

11. Test escrltura 

Manteniendo apretado LF 
(salto de linea) cuando se 
acciona el interruptor de 
puesta en marcha ON. 

12. Subrayado continuo. 

13. Tabulador 

Exislen 32 posiciones de 
tabulacion por linea. 


14. Longltud de formato 

El standard de 66 lineas, con 
espaciado de lineas y 
longitud del formato 
programable. 

VFU electrico. 

15. Tamaflo buffer 

1 linea standard. 

16 Buffer RAM 

2 K byte (standard) 

8 K byte (opcional). 

17. Tope posiclonador de 
papei continuo, 
desplazable parte anterior 
o posterior. 

18 Interlace 

Standard paralelo centronics 
de 8 bits. 

Serie RS232 C opcional. 

19. Grosor papei 

Maximo 2 copias, 40 g/m 2 
peso continuo, sensor papei. 

20. Operaclbn con 
interruptores 
De fbcil acceso. 

21. Caracteres por I’nea 
Normal: 80 

Normal expand'do:40 
Comprimido: 132 
Comprimido expandido: 66 
Elite: 96 

Elite expandido: 48 
Proporcional: n 

22. Clnta impresor® 
Autorretintada, mediante 
tampdn interno, cartucho 
compacto de cinta negra 
fbcilmente reemplazable y 
bajo coste. 


23. Tamano 

115 (h) x 275 (f) x 405 (a). 

24. Tension allmentacibn 

220 V/ 50 Hz. 

25. Entrada de papei 
Frontal-horizontal. 

26. Retroceso 
Por software. 

27. Bajo nlvel de ruldo 
2 velocidades: 

Velocidad lenta de 52 cps. 
Velocidad rbpida de 105 cps. 

28. Elevadores Interferes 
standard 

(para ubicacibn del papei 
contiuo debajo de la 
impresora). 

29. Motor: paso a paso 

30. Indlcadores: 

• Conexibn general 

• Fin de papal 

• On line 

31. Interruptores 

ON/OFF, On line (SEL), salto 
de pbgina (FF), salto de linea 
(LF). 

32. Compatible con la mayor 
parte de software 
exlstente. 


DAtAmon 

data mo n, s. a 

REPRESENTACION EN ESPANA OE : 

RIT5MMN. 

•IMPR6SORAS PROFESIONAIES- 
PROVENZA, 385-387. 6°. 1° 

Tel (93} 207 27 04 08025 BARCELONA 


TODAS LAS ESPECIFICACIONES PUEDEN SER CAM8IADAS SIN PREVIO AVISO. 
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pr6xima edici6n, reservando el resto 
del espacio para dar un pequeno re- 
paso a las indirecciones del firmware. 

Cassette manager 

El cassette manager como su nom- 
bre indica es el gestor y responsable 
directo del funcionamiento del casset¬ 
te, tanto en lo referente al modelo 
CPC-464, como a cualquier cassette 
conectado a cualquiera de los derrtes 
modelos. 

Este sistema gestiona tanto la es- 
tructura de los datos en cinta como su 
fiabilidad de uso. Como se explic6 en 
su momento Amstrad graba los datos 
por bloques, que constan de dos re- 
gistros: registro de cabecera y regis- 
tro de datos. El primero es el encarga- 
do de avisar al Amstrad lo que se va 
a leer, de qub tipo es el fichero, si esta 
protegido, etc. El funcionamiento de 
este sistema es tan perfect© que si se 
varfa en lo m&s minimo, los efectos 
pueden ser desastrosos. Por ejemplo 
un tipo de proteccibn incluido en un 
juego comercial, ha consistido en anu- 
lar el registro de cabecera del bloque 
y aumentar la longitud del registro de 
datos, con los resultados de que con 


cintas originates del mismo producto 
el sistema de carga falla en un 60 por 
ciento de las veces con lo cual han 
conseguido anular una de las mejores 
caracteristicas del Amstrad; su mag- 
nffica gestidn de las cintas que en un 
99 por 100 de las veces funcionaba 
sin ningun tipo de problema. 

Retomando el hilo de nuestro artlcu- 
lo, en esta entrega vamos a intentar 
dar una serie de datos complementa- 
rios al articulo anteriormente publica- 
do sobre el cassette. 

Hasta dos ficheros 
simultaneos 

El Amstrad es capaz de gestionar 
dos ficheros de cinta abiertos simultb- 
neamente; uno de ellos como entrada 
de datos y otro como salida, lo cual 
permite hacer un sistema de gestion 
bastante completo teniendo en cuen- 
ta las limitaciones propias de una cin¬ 
ta. 

Los nombres de los ficheros en cin¬ 
ta permlten hasta 16 caracteres con 
signos entre caracteres. pero lo reco- 
mendable es dar nombres de rrteximo 
ocho caracteres para asi poder pasar 
nuestros programas a disco sin exce- 
siva complicacidn. La estructura de 
los registros, como todos recordarbis 
fue comentada en el numero 2 de 
nuestra revista, por lo que para el si- 
guiente ejemplo es mejor que nos re- 
mitamos a ella. 



Tenemos todo lo que necesitas en informatica 

AL MEJOR PRECIO 

y el mejor asesoramiento para ti y tu ordenador 

Hermosilla 75, 1 - Otic. 14 - 28001 MADRID Tel.: (91) 276 43 94/435 04 70 
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Parlicipa en una de los mas excitanles 
deportes con nesgo el motonsmo 
acrobdlico. jlntenla balir el record 
mundial de sallo sobre autobuses 1 
P.VPCASSETTf 1.600 pts. 



Ldnzate a exploror mundos 
desconocidos con los Centuriones. En 
cada lugar que aterrices le aguardan 
peligros y desastres mesperados. 

P VP, CASSETTE: 1.6000 pis 


Pon a pruebu lus reliefs, rapidez y 
decision compili- o en un emocionante 
partido de hockey sobre hielo, contra un 
amigo o contra lu AMSTRAD 
P.VP CASSETTE 1.600 pis. DISCO. 2.500 pts. 


ASALTO. 


AIRWOLF. 


DRAGONS. 


GRAND PRIX RALLY II. 



Si le gusto la nmucion de la guerra 
desarrjla toaa una txjtalla acronaval 
Tus enernigos no te darun cuorlel y no 
olvides lo mas important .alacar 1 
P VP. CASSETTE t.600 pis 



Cinco cientilicos estan retomdos en lus 
ptnfundidodes de una base iPodras 
rescatarlos pilotando el migualable y 
safisl’cado helicoptero?. |Des!ruye las 
cuias de cunfrat de la delensa! 

PVP CASSETTE 1600 pis DISCO 2500 pis 


CONSTELACIONES. 


Apusionale en iina mquielnnle avontura 
umquilando draaones Comma, trepa y 
salla para salvor lu vida de los dragones 
roios 

PVP CASSETTE I 600 pis 


ESTIMATOR RACER. 


Parlicipa en el mundo de los Rallies con 
circuilos en Ires dimensiones Alraviesa 
hielo, lluyiu, desieitos, nieala y evila los 
cheques con lus compelidores 
Sorprfindele creando lus propios 
recoiridos 

PV.P CASSETTE. 1600 pis. DISCO. 2.500 pis 

EL CUERPO HUMANO. 

EL ESQUEIETO. 



Observe ias m6s importanles eslrellas 
del umverso en su posicibn real (graaos 
y horas). Descubre sus nombres y 
aprende a idenlificarlas y conocerlas 
PV.P CASSETTE 1 600 pis 

ESFASjA 


Desarrolla lu capacidad de cdlculo 
numbrico Conduce lu coche par el carnl, 
en una carrera contra reloj, con la 
respuesla malemOlica mbs aproximada 
4 niveles de dificuitad. 

P V.P DISCO: 2.500 pis. 


tCuanlos nombres de huesos de nueslro 
esquelelo eres capo* de recordar? 
Aprende y divierlele con este excelenle 
programa eaucalivo 
P.V.P CASSETTE 1.600 pis. 


Avdi. del Meditenaneo, 9. Tela. 433 IS 46 ■ 433 48 76. 28007 MADRID Delegation Catalog Tarragona, 110 ■ ToL 325 10 SB. 08015 BARCELONA 






































• Envios a domicilio a toda Espafia 

• Sin gastos de envio 

• Servicio rapido 


JUEGOS 


Ref. Titulo 

P.V.P. 


AMC-101 GRAND PRIX 
AMC-102 HARRIER ATTACK 
AMC-103 SPANNERMAN 
AMC-104 AGUILAS DEL ESPACIO 
AMC 106 LA PUlGA 
AMC-107 FRED 
AMC 108 MASTERCHESS 
AMC-109 LASERWARP 
AMC-110 HAUNTED EDGES 
AMC-111 CODENAME MAT 
AMC-112 AMSGOLF 


1.600, 

1.600, 

1.600, 

1.600, 

1.600, 

1.600, 

1.600, 

1.600, 

1.600, 

1.600. 

1.600, 

1.600, 


AMC-113 HUNCHBACK (QUASIMODO) 
AMC-114 HUNTER KILLER 
AMC-115 ROLAND EN EL TIEMPO 
AMC-116 ATOM SMASHER 
AMC-117 ELECTRO FREDDY 
AMC-118 ADMIRAL GRAPH SPEE 
AMC-119 COMANDO ESTELAR 
AMC-120 MANIC MINER 
AMC-121 ASTRO ATTACK 
AMC-122 QUACK 
AMC-123 BILLAR (SNOOKER) 

AMC-124 ROLAND EN EL TREN 
AMC-125 LA PLAGA GALACTICA 
AMC-126 ROLAND ENEL INFIERNO 
AMC-127 SIMULADOR DE VUELO 377 
AMC-128 ROLAND AHOY 
AMC-129 EL PUENTE 
AMC-130 MR. WONG 
AMC-132 MUTANT MONTY 
AMC-133 TENIS 

AMC-134 LABERINTO DEL SULTAN 
AMC-135 PUNCHY 
AMC-136 ALIEN BREAK 
AMC-137 FRUIT MACHINE 
AMC-138 OH MUMMY 
AMC-139 SPLAT 
AMC-140 CRAZY GOLF 
AMC-141 CUBIT 
AMC-142 3D INVASORES 
AMC-143 EL PREMIO 
AMC-144 JET BOOT JACK 
AMC-145 ROLAND EN EL ESPACIO 
AMC-146 PYJAMARAMA 
AMC-147 BOY SCOUT 
AMC-148 FANTASTIC VOYAGE 
AMC-149 THE KEY FACTOR 
AMC-150 JAMMIN 
AMC-151 SUPER PIPELINE 
AMC-152 TRAFFIC 


1.900'- 
1 600, 
1.600, 
1.600, 
1.600, 
1 600, 
1 600, 
1.900, 
1.600, 
1.600, 
1 900, 
1.600, 
1.600, 
1.600, 
2.00C, 


1.600, 

1.600, 

1.600. 

1.600, 

1.600, 

1.600, 

1.600. 

1.600, 

1.600, 

7.600, 

1.600, 
1.600, 
1.600, 
1.600, 
1.600, 
1.600, 
1.600, 

1.600, 
1.600, 


1.600, 


i no encuentra el programa 
que esta fouscando. el periferico 
que necesita o el iibro que 
le apetece... 

Tenemos todo para su 

nrif? CJ 


il 



AMC-153 
AMC 154 
AMC-155 
AMC-156 
AMC-157 
AMC-158 
AMC-159 
AMC-160 
AMC-167 
AMC-162 
AMC-163 
AMC-164 
AMC-165 
AMC-166 
AMC-167 
AMC-168 
AMC-169 
AMC-170 
AMC-171 
AMC-172 


CATASTROPHES 

SORCERY 

ROLAND Y LOS CUBOS 

FRANK'STEIN 

GATE CRASHER 

ELJUEGO DE LOS NUMEROS 

HOCKEY 

AIR WOLF 

GRAN PRIX RALLY II 
SUBTERRANEAN STRYKER 
ALIEN 

3D STUNT RIDER 
DRAGONS 
BRAXX BLUFF 
HOUSE OF USHER 
DEFEND OR DIE 

AJEDREZ TRIDIMENSIONAL (Serie Oro) 
3D GRAND PRIX (Serie Oro) 

3D BOXING (Serie Oro) 

SUPER tripper (Serie Oro) 


EDUCATIVOS 



Re f Titulo 

P.V.P. 

AMC-300 ANIMAL, VEGETAL, MINERAL 

1.600, 

AMC-301 PLANETARIUM/TIERRA 

1.600, 

AMC-302 RIOS/CAPITALES 

1.600, 

AMC-303 PERSONAJES/CRONO 

1.600, 

PBOFESIONALES 


Ref. Titulo 

P.V.P. 

AMC-500 Contabilidad Personal 

3.000 - 

AMC-501 AMSCALC (Hoja Calculo; 

4.300, 

AMC-o02 AMSWORD (Proceso Textos Simple) 

2.000, 

AMl-503 AMSWORD il. Proceso de Texto 

4.900, 

AMC-504 AMSBASE. Base de Datos 

2.000, 

AMC 505 STOCK-AID 

AMC-506 GENERADOR DE FACTURAS, 

1.900, 

FICHAS v DOCUMENTOS (Invostat) 

1.900, 

AMC-507 BASE DE DATOS Y ETIQUETAS 

1.900- 

AMC-508 TRATAMIENTO DE FICHEROS (MasterFile) 4 300 - 
AMC-509 EL EMPRESARIO 

Instruc. para dirigir su negocio 

4.300, 

AMC-510 HOJA DE CALCULO (MasterCalc) 

5.000, 

UTILIDADES Y LEhJGUAJES ^ 


Ref. Titulo 

P.V.P. 

AMC-700 DEVPAC. ENSAMBL/DESENSAMBLADOR 4 300 - 

AMC-701 HISOFT PASCAL 

4.900, 

AMC-702 Disenador de Pantallas 

4.300, 

AMC-703 AMSDRAW Graficos y dibujos 

2.000, 


1.600, 
1.600, 
1 600, 
1.600, 
1.600, 
1.600, 
1.600, 
1.600, 
1.600, 
1.600, 
1.600, 
1.600, 
1.600, 
1.600, 
1.600, 
1.600. 
2.300 - 
2.300, 
2.300, 
2.300, 





































































AMC-704 GUIA DE PASCAL (libro) 

7.500, 

AMC-705 FORTH 

5.000, 

AMC-706 AMSTEST 

1.600, 

JUEGOS 

Ref, Titulo 

P.V.P. 


AMD-100 FRED/LA PLAGA GALACTICA 
AMD-101 LA PULGA/AMSDRAW 
AMD-102 ROLAND EN EL ESPACIO 
AMD-103 SORCERY 
AMD-104 PYJAMARAMA 
AMD-105 EL JUEGO DE LOS NUMEROS 
AMD-106 HOCKEY 
AMD-107 AIRWOLF 
AMD-108 GRAN PRIX RALLY II 
AMD-109 SORCERY PLUS (Serie Oro) 

AMD-110 AJEDREZ TRIDIMENSIONAL (Serie Oro) 
AMD-111 3D GRAND PRIX (Serie Oro) 

AMD-112 3D BOXING (Serie Oro) 

AMD-113 BEACH HEAD (Serie Oro) 

AMD-114 SUPER TRIPPER (Serie Oro) 


4.900, 

3.000, 

2.500, 

2.500, 

2.500, 

2.500. 

2.500. 
2.500 - 

2.500, 
3.000, 
3.000, 
3.000, 
3.000, 
3.000. 
3.000, 


EDUCATIVOS 


Ref. Titulo 

P.V.P. 


AMD-300 MIRANDO LAS ESTRELLAS 
AMD-301 PLANETARIUM/CRONO/TIERRA 
AMD 302 CAPITALES/RIOS/PERSONAJES 


4.300, 

2.500, 

2.500, 



AMD-500 PLANIFICACION DE PROYECTOS 
(Project Planner) 

AMD-501 TOMANDO DECISIGNES 
(Decision Maker) 

AMD-502 BASE DE DATOS CP/M (Micropen) 
AMD-503 TRATAMIENTO DE TEXTOS CP/M 
(MicroScript) 

AMD-504 TRATAMIENTO DE TEXTOS (Amsword) 
AMD-505 CONTA8ILIDAD GENERAL 
AMD-506 CONTROL DE STOCK 
AMD-507 CONTROL DE VENCIMIENTOS 
AMD-508 HOJA DE CALCULO CP/M (MicroSpread) 
AMD-509 EL EMPRESARIO 

(Instruc. para dirigir su negocio) 

AMD-510 MASTERCALC 

AMD-511 TRATAMIENTO DE TEXTOS PROFESIONAL 
(Amsword II) /'«. 


4.900, 

4.900, 

10.500, 

10.500, 

5.700, 

12.700, 

10.500, 

7.500, 

10.500, 

5.700, 

5.700, 

5.700, 


UTILIDADES Y LENGUAJES”^ 


Ref. Titulo 

P.V.P, 


AMD-700 HISOFT PASCAL 
AMD-701 ENSAMBLADOR/DESENSAMBLADOR 
(DevPac) 

AMD-702 DISENADOR DE PANTALLAS 
^Screen Designer) 

AMD-703 GUIA DE PASCAL 
AMD-704 FORTH 


5.700, 

5.700, 



LIBROS EN CASTELLANO 


Ref. Titulo 



AML-100 Curse Autod de Basic I 
AML-101 Programando con Amstrad 
AML-102 Juegos sensacionales para Amstrad 
AML-103 40 Juegos Educativos para Amstrad 
AML-104 Guia ae Referencia Basic 

para el Programador 3.000, 

AML-105 Musica y Sonidos con el Amstrad 1.000, 

AML-106 H3cia la Inteligenda Artificial con Amstrad 1.300, 
AML-107 Codigo maquina para principiantes con 

Amstrad 1.900, 

AML-108 Curso autodidactico Basic II 2.500, 

AML-109 Programando Basic con AMSTRAD 1.900, 

AML-110 Tecnicas de Programacion de Graticos 

en el Amstrad 1.700, 

AML-500 Manual de Firmware (en ingles) 


PERIFERICOS Y ACCESORIOS 


i 


Ref. 


Titulo 


P.V.P. 


AMP-100 Unidad de Diskette con controlador 45.500, 

AMP-101 Unidad de Diskette sin controlador 39.500, 

AMP-102 Modulador TV para 464 9.000, 

AMI-103 Impresora 45.700, 

AMP-104 Cable Centronics 3.675, 

AMI-109 Impresora Printer 130 54.900. 

AMP-105 Cable 2, 3 unidad disco 3.450, 

AMP-106 Cable Cassette 664 (3udio) 1.150. 

AMP 107 Modulador TV para 664 y 6128 9.450 

AMP-1 08 Sintetizador de Voz SSA 1 9.000. 

AMP-109 Interface Serie RS 232 C 11.750, 

SVP-116 JOYSTICK QUICKSHOTI 1.600, 

SPV-117 JOYSTICK QUICKSHOT II 2.500, 

SVP-133 JOYSTICK QUICKSHOT VII 2.200, 


BOLETIN de PEDIDO 
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TITULO 

Cant 

P. V. P. 
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D.P. 
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Incluyo talon Bancario a nombre de "CHIPS & TIPS □ 
Contra Reembolso D 



ENVIEN ESTE BOLETIN A: 


"CHIPS & TIPS', Paseo de la Castellana, 126 2046 MADRIP 
Pedidos por telefono (911 4116463 


AMD-900 DISCO VIRGEN 3” 


1.050 "SOFTMAIL" Es un servicio de "CHIPS & TIPS" 






























































































nueva empresa en juegos 
para Amstrad, llega un 
gran programa para quien 
disfrute con las aventuras 
animadas y de accidn. Del 
mismo tipo que el 
Sorcery, y aunque menos 
cuidado en el terreno 
grafico, ofrece un 
argumento mucho mds 
original. Montados en un 
minisubmarino y 
explorando cada camarote 
de un pecio pirata, 
deberemos encontrar la 
legendaria Corona del 
Diablo, una valiosisima 
corona de oro que 
descansa desde hace 
muchos anos en el fondo 
de los mares. 


Programa: The Devil’s 

Crown 

Tipo: juego . 

Distribuidor: Serna 
Formato: disco y cassette 
Precio: 


En las entranas de un 
barco hundido 

I mapa incluye unas 40 
pantallas distintas, por 
las que podremos mo- 
vernos siempre que ten- 
gamos suficiente oxfgeno. En ellas 
encontraremos diferentes objetos, 
todos los cuales nos serdn de 
suma utilidad si los utilizamos en el 
momento adecuado. Para cogerlos 
hay que pulsar el botdn de disparo 
cuando pasamos sobre ellos; da- 
das las limitaciones de potencia de 
nuestro pequeno vehfcuio s6lo po- 
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Cannon store 
Vou are carr 
Oxygen Leve 


dremos llevar uno cada vez. En la 
parte baja de la pantalla se nos in- 
dica (en inglds) cudl es el camaro¬ 
te donde estamos, en qud cubierta 
se encuentra y qud objetos trans- 
portamos en ese momento. Un ob- 
jeto importante es la linterna, sin la 
que no veremos nada en algunos 
de los camarotes. 

A lo largo del juego nos encon¬ 
traremos con algunos enemigos. 
Los mds curiosos son unos peces 
(no de IBM), que pueden llegar a 
atacarnos si no les disparamos, 
pero que, en cuanto lo hacemos, 
huyen despavoridos. Tambien es- 
tdn los fantasmas de la tripulacion 
pirata que llevaba el barco, que 
pueden resultar mds o menos pe- 
ligrosos segun el objeto que trans- 
portemos. Por ejemplo, un escudo 
los detendrd, una daga los destrui- 
rd, y si sobra llevamos una campa- 
na moriremos. Los fantasmas pue¬ 
den influir en nuestro nivel de oxi- 
geno, aumentdndolo o disminu 
ydndolo segun les dd. 

En la parte inferior de la pantalla 
tambien hay un contador que mar- 
ca la cantidad de oxfgeno de que 
disponemos. Hay que estar atento 
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ser bastante util dibujar un mapa 
para no perdemos con tanta habi- 
tacibn, aunque los objetos en oca- 
siones cambian de sitio y no hay 
quibn los localice. 

Los efectos sonoros cumplen su 
misibn perfectamente. Adembs al 
comienzo de cada juego podemos 
disfrutar de una bellisima melodfa 
del mbs puro estilo barroco. Las ar- 
pas que podemos encontrar por el 
barco tienen la curiosa facultad de 
tocar una corta cancioncilla cada 
vez que las cogemos. 

Resumiendo, que este es un jue¬ 
go en el que tanto la estrategia 
como la accibn son necesarias si 
queremos llegar a algo. Un juego 
entretenido, con un argumento in- 
teresante y el nivel de dificultad 
justo para hacerlo atractivo desde 
el principio sin agotarlo en el pri¬ 
mer dia. 


y buscar alguna escafranda autb- 
noma (lease bombona de oxigeno) 
en cuanto lleguemos a la zona 
roja, pues si se termina el aire (evi- 
dentemente) nos ahogaremos. 
Otro contador senala las balas que 
nos quedan, cuando este numero 
sea bajo podremos aumentarlo 
(hasta un mbximo de 50) cogiendo 
alguna pistola de las que se en- 
cuentran por el barco. 


Dos bombas y un 
destino 

Llegar hasta la corona no es 
nada fbcil, tendremos que seguir 
una serie de fases antes de que la 
podamos ver. Primero hay que co- 
ger las tres campanas que se en- 
cuentran por el barco y llevarlas a 
una habitacibn donde hay otras 
tres parpadeantes. Despubs hay 
que recoger los zafiros. Esto no es 
tan fbcil como pueda parecer, pues 
es necesario llevar un determina- 
do objeto, que podremos cambiar 
por uno de ellos. Para finalizar hay 


que dejar la Have adecuada sobre 
el candado adecuado para que la 
Corona del Diablo aparezca. 

Todo esto ha de hacerse muy rb- 
pidamente, pues las botellas de 
oxfgeno que hay repartidas por 
toda la nave se irbn acabando, y 
con ellas nuestra existencia. Los 
simpbticos, aunque peligrosos, pe- 
ces morirbn definitivamente cuan¬ 
do les disparemos, pero los fantas- 
mas sblo desaparecen temporal- 
mente cuando los destruimos, por 
lo que en cuanto volvemos a en- 
trar en el camarote donde se en- 
contraban aparecen de nuevo. 

Hay que tener mucho cuidado 
con las banderas piratas que po¬ 
damos encontrar, pues suelen re- 
sultar bastante peligrosas si inten- 
tamos cogerlas. Conviene, por tan¬ 
to, ignorarlas y pasar de largo. 


Graficos y sonido 

El movimiento de los sprites es 
rapido pero suave, con un efecto 
bastante bueno. El unico defecto 
es que la rutina de impresibn no 


estb controlada por interrupciones, 
y adembs borra y vuelve a dibujar 
el sprite cada vez aunque bste no 
se haya movido. El resultado de 
todo esto es un parpadeo constan¬ 
ts que puede resultar algo moles- 
to, aunque no tanto como para ha- 
cernos abandonar un juego tan 
atractivo. 

Se puede disparar en la direc- 
cibn en que se avanza incluyendo 
las diagonals y excluyendo arriba 
y abajo. Las rbfagas son rbpidas y 
nutridas, por lo que resulta diverti- 
do utilizarlas. Los peces tienen 
unas reacciones bastante curio- 
sas, no se mueven al azar pero 
tampoco son los tipicos autbmatas 
que siempre resultan aburridos; 
parece que con sblo mirarlos fija- 
mente salgan a escape, mientras 
que si no tenemos balas se perca- 
tan de nuestra miedo y nos atacan. 

Todos los camarotes estbn per¬ 
fectamente ambientados, con can- 
tidad de objetos, burbujas que su- 
ben constantemente, etc. Puede 


Amstrad User / 31 


JUEGOS 










Programs: Cylu 
Tipo: juego 
Distribuidor: Serma 
Formato: cassette 
Precio: 1.200 ptas. 


uestra tarea comienza en 
una pequeiia y atestada 
habitation en lo m£s pro- 
fundo de un gran laberin- 
to. Tenemos bajo nuestro mando a 
Cylu, un pequeho robot que debemos 
guiar a lo largo y ancho del laberinto. 
Ocultos en este hay 24 objetos que de¬ 
bemos devolver al ordenador principal. 
Durante la misidn encontraremos 32 
campos de fuerza que nos impediran 
el paso a muchas secciones del labe¬ 
rinto. Encontraremos objetos curiosos, 
como CPUs, que podremos transpor¬ 
ter (hasta un m&ximo de cinco), utilizar 
(los utilizables), examinar o volver a 
dejarlos. 

En la parte baja de la pantalla apa- 
recen los objetos que vayamos reco- 
giendo, sobre alguno de ellos habra 
una Have que indica que es el selec- 
cionado {con SHIFT) sobre el que ac- 
tuaran todas las funciones. Hay tan- 
ques de combustible que debemos uti¬ 
lizar cuando nos haga falta (tambidn 
en la parte baja hay un contador que 
nos lo indica). 

El laberinto, en tres dimensiones, es 
grande y complejo, y ademas solo po- 
demos ver una pequena parte de el, 
por lo que es conveniente hacer un 
mapa segun avanzamos, 

Los graficos son buenos, pero al ser 
muy pequenos, hallarse apinados y 
medio tapados por partes del laberin¬ 
to, no siempre son reconocibles. Los 
efectos sonoros son bastante buenos, 
como tambien lo es la melodia inicial. 
Aunque no es excesivamente lento 
para el tipo de grdficos que incluye, 
acusa una falta de action bastante 
grande. Es mas un juego de estrategia 
y aventura que un arcade tipico. 






Adiccion: AAAAAAA 
Presentacidn: AAAAA 
Graficos: AAAAAAAA 
Acci6n:AAA A A A 



























Programa: Dummy Run 
Tipo: juego 
Distribuidor: Erbe 
Formate: cassette 



H ERBERT, el incansable 
beb6 de « Everyone's A 
Wally», sigue haciendo 
de las suyas. Ha creci- 
do y se ha convertido en un travie- 
so nino que corretea y salta sin es- 
tarse quieto ni un momento. En 
esta ocasidn ha ido de compras 
con Wally y Wilma y se ha perdido 
en unos grandes almacenes. 
Nuestra misidn es guiarle a trav6s 
de las secciones de la tienda y en- 
contrar, antes de la hora de cierre, 
la sala de objetos perdidos donde 
Wally y Wilma le esperan des- 
consolados. 

La estructura del juego es bas- 
tante clctsica, diversas habitacio- 
nes comunicadas entre si en las 
que hay distintos tipos de enemi- 
gos. Estos disminuir6n nuestra 
energfa hasta hacernos coger bue- 
nas pataletas, o, a la tercera de 6s- 
tas, finalizar el juego, Para recupe- 
rarnos de esto debemos comer to- 
das las golosinas que encontre- 
mos. 

Algunas habitaciones toman la 
forma de pequenos juegos de ar¬ 
cade. Esta estrategia, cada vez 
m6s utilizada en programas de 
este tipo, es muy de agradecer, 
pues corta el ritmo del juego y lo 
hace mucho m6s entretenido. 

Diseminados por las habitacio¬ 
nes hay objetos que nos resultar6n 
utiles para fines concretos. Por 
ejemplo, la raqueta sirve para ju- 
gar al tenis, la bomba para destruir 
los edificios, y la Have para abrir la 
caja sorpresa y, aprovechando el 
impulso que esta nos da, subir a 


los estantes de m6s arriba. Para 
coger los objetos (m6ximo dos). 
basta con pasar sobre ellos, auto- 
m6ticamente se toma el que habia 
y se deja el penultimo que co- 
gimos. 

Hay cuatro plantas distintas. 
Para cambiar de planta podemos 
elegir entre hacerio por las escale- 
ras o usar el ascensor. Si elegimos 
este medio hay que tener mucho 
cuidado de que el ascensor se en- 
cuentre en la planta en que esta- 
mos, pues si no caeriamos por el 
hueco. Aunque disponemos de un 
paracafdas para estos casos, no 
es conveniente abusar, pues se 
pierde bastante energia en las cai- 
das. 

Los gr6ficos del juego son muy 
variados y bastante cuidados. Las 
habitaciones est6n llenas de obje¬ 
tos, diferentes en cada una de 
ellas, y los personajes tambi6n son 
variados. El movimiento es bueno, 
aunque en los diversos enemigos 
excesivamente automatizado. La 
presentacion general m6s que 
aceptable, siguiendo la tdnica a 
que nos tiene acostumbrados Mi¬ 
cro-Gen. 


ADICCION: A A A A A A A 
PRESENTACION: AAAAAAAA 
GRAFICOS: AAAAAAAA 
ACCION: A A AAA A A 
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N os encontramos en esta 
ocasidn con un programa 
que, sin salirse d@ la ca- 
tegorfa de los arcades y 
juegos de accidn, aporta nuevos 
planteamientos para este tipo de jue¬ 
gos. Normalmonte los programado- 
res crean una serie de rutinas d© mo- 
vimiento y una estructura, mds o me- 
nos complicada, que se repite a me- 
dida que se desarrolla el juego. Pue- 
den cambiar ©scenarios, dificultad o 
las caracterfsticas de los enemigos, 
pero normalmente la estructura ge¬ 
neral permanece de principio a fin. 
En el caso que nos ocupa, segun 
avanzamos en el juego, encontra¬ 
mos una serf© de pantallas, que, 
aunqu© unidas por una Ifnea argu- 
mental y de grdficos bastante conti- 
nuada, parece que fueran de progra- 
mas distintos. 

Nuestro objetivo: destrulr las ba¬ 
ses sovidticas de lanzamiento de mi- 
siles para asl salvar al mundo (en- 
tidndase EE.UU.) de un desastre nu 
clear. Toda una misi6n suicida, hay 
que cruzar el espacio adreo ruso, 
destrulr las bases antes que los mi- 
siles de dstas hagan explosidn, y, ya 
que estamos, atacar el Centro de 
Defensa en el mismo Moscu y des- 
truir su reactor nuclear. Para hacer 
todo esto hay que pasar por muchas 
fases distintas. 


10 cuartel general del 

SAC 


Comenzamos con una vista del ra¬ 
dar del SAC (Cuartel General de la 
Aviacidn Estratdgica USA). Con dl 
tendremos una visidn panordmiea 
del hemisferio septentrional, en don- 
de se pueden distinguir claramente 
Europa, EE.UU., la posicidn de na¬ 
ves y misiles, y la situacidn en que 
se encuentran las bases rusas y 
americanas. Tambidn podremos ver, 
flotando sobre la Tierra, la estacidn 
espacial, equipada con todo un es- 
cuadrdn de cazabombarderos 
Stealth. Un marcador en la parte in¬ 
ferior de la pantalla nos indicard el 
tiempo que queda antes de que los 
misiles enemigos llegen a su desti- 
no; este dato puede sernos de gran 
utilidad, como veremos mds ade- 
lante. 

Cuando detectemos un lanza- 
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Programa: RAID!!! 
Tipo: juego 
Distributor: Erbe 
Formato: cassette 
Precio: 



lamriRnirtTiDN: 

I munch SITE : 
ihhwii : 
inn: to inpncT :dp 
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ADICCION: A A A A A A A 

D I F I C U L 
TAD: AAAAAAAAA 

GRAFICOS: A A A A A A A 

ACCION: AAAAAAAA 


sruw:: 


miento por parte de los rusos, podre- 
mos pasar, pulsando el botdn de dis- 
paro, a la estacion especial para ha- 
cernos cargo de la situacidn. Es aquf 
cuando comienzan los problemas. 


En el hangar 

Un vez dentro de la estacidn, nos W 
encontramos con un hangar en el 
que descansan las 10 naves que de- 
bemos utilizar para penetrar en el es- 
pacio a6reo enemigo. Como coman- 
dantes del escuadrdn somos los res- 
ponsables de sacar las naves del 
hangar en buenas condiciones. Esto, 
que puede parectar f&cil a primera 
vista, es uno de los pasos m£s com- 
plicados que habremos de seguir si 
queremos finalizar el juego. 

El botdn de disparo hard que nos 
elevemos del sueio, debe pulsarse 
de vez en cuando, pues, aunque la 
gravedad es muy leve, no pasa mu- 
cho tiempo sin que volvamos a caer. 
Empujando el mando hacia delante 
encendemos el motor principal, io 
cual aumentar& la velocidad en la di- 
reccidn a que apuntemos. Empujan¬ 
do a derecha o izquierda haremos 

que gire la nave en esa direccidn, 
pero no avanzard hacia ella si no en¬ 
cendemos el motor principal des- 
pu6s de esto. 

La inercia que toma el avidn es tal 
que en los primeros intentos es casi 
imposible hacerse con el control del 
aparato, con resultados poco espe- 
ranzadores para el jugador. Adem&s, 
una vez que conseguimos medio- 
mantener bajo control surge el pro¬ 
blems de que la puerta parece no 
querer abrirse mientras no avance- 
mos en direccidn contraria a ella a la 
vez que nos elevamos, y por si fue- 
ra poco se abre el tiempo suficiente 
para «aguillotinarnos» justo cuando 
vamos a pasar. 

No hay que abdicar, pues con el 
tiempo las cosas van yendo mejor. 
Incluso puede qu© de vez en cuan¬ 
do logremos sacar algun que otro 
avidn del hangar y podamos pasar a 
la siguiente fase del juego. 


Hacia las bases 
enemigas 

Una vez que acabamos con todo 
el escuadrdn, aparece de nuevo la 
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vista general en la que los cazas que 
hayamos podido sacar estarAn sim- 
bolizados por pequenos puntos blan- 
eos junto a la estacibn espacial. Uno 
de ellos parpadearA sefialando que 
es el que debemos guiar hasta su 
destino: la base sovibtica que haya 
lanzado el rrtisil, la cual aparecerA en 
bianco para destacarse de las de- 
mAs., 

Una vez que llegemos a ella ha- 
br6 que cruzar una zona de terreno 
enemigo antes de poder destruirla. 
Aqu( los mandos de control se pare- 
cen mAs a lo que estamos acostum- 
brados, pero el ver a la nave desde 
un lado eonfunde al principio. 

Conviene volar bajo para despis- 
tar al radar y evitar los misiles an- 
tiaAreos, pero hay que tener cuida- 
do con los obstAculos que vamos en- 
contrando, y especlalmente con las 
armas defensivas, que deberemos 
destruir a tiempo. 

Si cruzamos esta zona con Axito 
pasaremos a una nueva fase en la 
que debemos destruir los silos de la 
base de lanzamiente de mi'si'les. El 
control aqul es parecido al anterior, 
pero la pcrspectiva totalmente distin- 
ta. Conviene estar atento al tiempo 
que queda para que nuestras bases 
sean destruidas, y si Aste es peque- 
no destruir el silo principal, que es el 
que controla todo. 

Hay que tener cuidado con las na¬ 
ves ensmigas que aparecen por la 
izquierda, y deshacernos de ellas 
antes de que bajen demasiado. Si 
conseguimos destruir las tres bases 



defensivas echaremos pie a tierra 
para pasar a una nueva fase en la 
que intentaremos destruir el centra 
de defensa soviAtico. 


Mas cerca de! objetivo 


En una trinchera frente al centra 
de defensa, y armado con un bazo- 
ka, estAs solo ante el peligro, Pue- 
des desplazarte de derecha a iz¬ 
quierda y controlar el Angulo de tiro 
de tu arma. HabrA soldados en los 
muros a ambos lados que irAn a por 
ti, y tanques que saldrAn de las puer- 
tas laterales. Pero el objetivo princi¬ 
pal es la puerta del reactor nuclear, 
una cada vez, que reconoceras por- 
que se pone blanca cuando se le dis- 
para (lo cual puede ocurrirle a cual- 
quiera). 


Una vez destruida esta puerta y 
cuando no queden tanques ni solda¬ 
dos a la vista, podrAs pasar a la si- 
guiente fase, en la que tu misibn es 
hacer que explote el reactor destru- 
yendo a los robots de mantenimien- 
to y evitando que puedan refrigerar- 
lo. Los robots no son tontos, una vez 
que te localicen intentarAn destruir- 
te, por lo que debes anticiparte a 
ellos y dispararles por la espalda, 
que es su unico punto ddbil. 

Dispones de unas granadas en 
forma de discos que puedes enviar- 
le «de rebote» contra la pared pos¬ 
terior. Para ayudarte en esta tarea, 
un sistema de gula por lAser marca- 
rA un punto negro en la pared, que 
podrAs desplazar dando adelante y 
atrAs y alinear con los robots antes 
de enviarles las granadas. 

Si consigues destruir los robots 
debes escapar de alii antes de que 
el reactor haga explosibn. Lo que su- 
cede despuAs dejaremos que lo des- 
cubras por ti mismo. 


Un trabajo made in 
USA 


Como en casi todo lo que se hace 
en America, al «destripar» este pro- 
grama queda patente la profesiona- 
lidad de sus autores. Originario del 
Commodore, y, aunque algo «recor- 
tado» en su versibn Amstrad, hace 
que nos demos cuenta de lo que 
pueden dar de si 64K en un mi 
croordenador. 

El movimiento es impecable a lo 
largo de todo el juego, y el efecto tri 
dimensional estA suficientemente 
conseguido gracias a las sornbras 
que siguen a cada una de las naves. 
En los grbficos no se ha buscado la 
complejidad que hace que muchos 
de los ultimos programas queden 
como faltos de «chispa», pero tienen 
estilo y cumplen perfectamente su 
papel. El nivel de dificultad es muy 
elevado, no es de los programas con 
los que se acaba el primer dla ni el 
segundo, pero gracias a la variedad 
en las pantallas esto no lo hace 
aburrido. 

En definitiva, un gran juego para 
quien le guste la mAxima dificultad y 
tenga aficiones bblicas contra los 
rusos, 
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DISPONIBLE PARA ZX SPECTRUM 

AMSTRAD 


iiiNO LO SUENES!!! iJUE» ALO! 

SIENTE LA EMOCION DE LO DESCONOCIDO 

Imi W 

CORRE TU PROPIO RIESGO 
SALVA A TU COMPANERO/A ATRAPADO/A 
REUNE LOS FRAGMENTOS DEL CUADRO 
SON TU AMULETO 
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Manual de Referenda Basic 
para el Prograrnador 

La mas auiorizada y compieia 
guia para programar en 
Locomotive Basic. 

3.400.1 Pts. 


CODIGO MAQUINA 
PARA 

PRINCIPIANTES 
CON AMSTRAD 



C6digo mdquinc para 
principiantes con AMSTRAD 

Ideal para iniciarse en el c6digo 
maquina del ZSOyen el 
sislema operative del AMSTRAD. 

2.100 - Pts. 


Tecnicas de 
Programacion 
de Graficos 
en el Amstrad 


•• i» 

•• •• 

KISTRAO 


T§cnicas de Programacidn de 
Grbficos en el AMSTRAD 

Este libro ensena a aprovechar 
las excelentes funciones 
graficas del AMSTRAD, con 
multiples ejemplos. 

1.950 - Pts. 


Juegos Sensacionales para 
AMSTRAD 

Listados completos de 27 
esfupendos juegos de muy 
diversos estilos. 

1.950 - Pts. 


Programando con AMSTRAD 

Fundamental para el usuano 
principiante. 

Ameno y repieto de ejemplos. 

2.400 -Pts. 


Had a la 
Intelipencia 
Artificial con 
Amstrad 



Jeremy Vr>» 


Hacia la Inteligencia Artificial 
con AMSTRAD 

Gonvieda su AMSTRAD en un 
companero iriteligente 

1.500- Pts. 


Mtisica • 

ySonidos 


Amstrad 



Mflsica y Sonidos con 
AMSTRAD 

Programe musica y efectos 
sonoros y convierta su 
AMSTRAD en un sintetizador. 

1.200 - Pts. 



Curso Autodiddctico de Basic I y II 

Un completo y estructurado Curso de Basic apoyado con numerosos 
ejemplos y acompafiado de cassettes. 

2.900.- Pts.cada volumen 


40 Juegos Educativos 
Listados completos 
(matemdticas, geograffa, 
musica, etc.) para aprende r 
divirtiendose. 

1.950.— Pts. 



Programacidn de Basic con 
AMSTRAD. 

Imprescindible para el 
princioiante y eficaz 
herramienta para el 
prograrnador avanzado. 

2.100 - Pts. 



Avd. del Mediterrfineo, 9 
Telfs.: 433 45 48 - 433 48 76 
28007 MADRID 

Delegacidn en Cataluna: 

C/. Tarragona, 110 - Telf. 325 10 58 
08015 BARCELONA 

DE VENTA EN EL CORTE INGLES 
Y TIENDAS ESPECIALIZADAS 
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STE es un programs muy sencillo aunque no por ello deja 
de ser entretenido. El jugador controla la raqueta me- 
diante las teclas del cursor y debe destruir todos los bis¬ 
ques que se encuentran en la parte superior de la pan- 
talla golpedndolos con la pelota. Comenzamos el juego con cinco 
pelotas que iremos perdiendo cada vez que no logremos golpear- 
ia con la raqueta. Aun siendo un programa muy simple la dificul- 
tad del juego es bastante elevada siendo muy dificil concluir una 
partida con 6xito. 
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10 REW ********* FRONTON *********** 
20 REM ***** AUSTRAO (JOES i*86 ***** 
30 REM ***************************** 
40 REM 

50 BORDER 1 f Z Ml 0,1:INK 2,24:INK 3,6 
S3 CREED KE 15,2 


3 -» 1 <-> 1 i~i r-> rs ** r»,|T — r-| G? _ “» * ^ _ Ft O 

, I , i , .li: , v, ^ , cili j, - 4*0 


■’C 

ENV : , 

1 

, 13 

(0, 

so 

ENV 3, 

1 

, c 

? 4 « 

90 

ENV 2. 

nr 

,3, 

3, 1 

100 

NODE 

i 



110 

MOVE 

30 i 

6; d: 

120 

PEN 3: 

LOG 

ATE 


120 PEN 3: LOCATE r,l:PRINT STR1MG$\36, 1 *4 3 > : PEN 2 : LOCATE 3 f 2:PRINT STRING* 536, 14 
3):PEN 1 : POP r=5 TO 6;L0CATE 3,r:PRINT STRING* <3a, i*S 
3).‘NEXT • 




b ■ 9 


l ,i r* 

VID=5:RUN=C 


1 5C 

PEN 1:30EUD 4 

LC 

1 60 

tp r.NfiEYao" 

"THEN 160 

17 6 

GOTO 200:REN 

C D n' i 5 m I 1 d ■=■ 1 j ii,€. ■ j 

ISO 

LOCATE b-,-,24; 

PRINT" ";C“RINGS 

i^O 

RETURN 


200 

f“! : ys~i : IF 

IHT fRND*:?? =i them 

210 

REN 1:GOSUB 1 

ov 

220: 

0,400 


2.3.0 

..■-bv- 1 4 : y= 11 : X 

i=x : yl=y 

240 

s. 1 =>. +xa i'y 1 =y * 

ya:REH corr i enzo i 

250 

IF x!=3 OR vl 

= 38 THEM ); - xu. 

260 

SOSUE 400 


270 

IF yl=24 AND 

1 b •- 4- i AMD 1 , b \ 

( (X 

>b < f 5 ! OR (b ; *■ 

2 5 • :TF a=- 1 THEN 

4 ~ y 

+1 


220 

IF yl-25 THEM 

LOCATE PRINT 


■ V - -; ; 


!, 44,5,7,1,i:a= 


290 GOSiJE 130 

30C t -" E ■" T <(it*,.i;-l, ; l'_•*> 1 : -1 ; : I" too THEN z = -.i: >■ = »/ ::yl=>i+ya:GOSUB 

430 ; JR t-2 THEN pu ,=pu n * 10 : C-03UB 460 
310 IF t *3 "HEN puT-p l + 2C ; jQE'iE 4 tO 
320 IF t=l T HEN uan = pni-,-5: SOS LIB 4*0 
330 IF y[aj THEN ,s=t 


3^0 

1 OCATE PRINT 

“ I LOCATE k 1 j y 1 : PR 

IWT CHR* (233; 

I: / - / i 


IP >fel OR ,;~z OR 

.,=38 THEN SOUND 12? 

, . w , C , , - , A 


360 

Gro 24 0 : rex III 

de I b i ; . c 1 *r p i f, c; i p s, a 



W ' i.* 

v i d ~ ■- id-1 : z DUN,, 1 

— < n as i -i ■- • t r- 

, 4 .* , ^ 6 , A £. , *■- , *- . 4. F 

yid = C rhiEM EOTI 4 

50 

380 

GOSUE 460 




390 

Gu t L' 2 r J0 




‘100 

IF ; p,VEY ( 3} -0 OR 

inkev i y*r ) -Ox-’o b: 

2 THEN BX«Ei+-Z-:-R 

■2-TURN 

<11 0 

if i im'kt •: i : -o or 

7 1 *'■ tv ' ’"’o ) = 0 * AND b >! 

•132 THEM b.o-b:..- >2: 

RETURN 

*20 

RET! !Rif 




330 

L U C A ’’ 2 1 , / 2 : R E I ■: 

T - 11 : RETURN 



4-40 

IF pun>=nec T HEN 

r ec =pu?■, 



■* er 

pr.i !'■ -■ 0 : d=5:003UP 

-16C : GGTG 100 



-'i : j 0 

SOUND 130,0,20,17 

— r, i *-»/-< «i t « i n i “ 

|J«M Ji.UJLil t 4 , ^ 

IPSI.NT“RECORD 

ec;:LOCATE 


PUNT05 -i pun: LOCATE EG,25:I NT"VIDAS ” ! u * 1 P.E 1LW-: 
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OTHELO 



STE interesante juego no es muy conocido en Espana. Se 
desarrolla en un tablero similar al del ajedrez, consist© 
en capturar entre dos fichas propias el mayor ntimero 
posible de fichas del contrario volvibndose entonces de 
nuestro color. Podemos elegir el color de nuestras fichas (blan- 
cas o negras), teniendo en cuenta que las fichas negras siempre 
mueven primero. Para realizar las jugadas debemos introducir la 
fila y la columna a donde deseamos movernos. Los movimientos 
ilegales son rechazados con un mensaje de advertencia debiendo 
repetir la jugada. Gana el jugador que tenga mis fichas al final del 
juego. El programa es bastante bueno, con un nivel de juego alto, 
lo que garantiza muchas horas de dura competencia. Solamente 
se echa en falta una opcibn que permita dosificar el nivel de juego 
y la posibilidad de juego contra otra persona. 




























10 REM **** OTHELO pOR M.J.GRIEEI **** 

20 REM ******* AMSTRAD USER 1986 ****** 

30 REM 

40 BORDER 14 
50 CLEAR 

60 MODE 1 : REM 0: PAPER 1 : CL'S 

70 INK 0,0:INK 1,14:INK 2,IS:INK 3,26 

80 LOCATE 2,3:PEN 3:PRINT"0":LOCATE 3,4:FRINT“T":LOCATE 4,5:PR INT"H“:LOCATE 5,6: 
PRINT "E 11 

90 LOCATE 6 j ' , :PRINT , L":L0CATE 7 ,3 : PRI NT 0 " 

100 WINDOW Pi 1,2,39,22,25: PAPER P.1,1; PEN P.1,0:CLS P.1 
110 PEN 0 

120 LOCATE P.1 , 13, 1 : FRI,NT P, 1 , " LAS NEGRAS SIEMPRE JUEGAN PRIMERO" 

130 LOCATE P.1 , 1,3: PRINT P.1, "PULSE NOB PARA ELEGIR NEGRO 0 BLANCO" 

14C B$=INKEY$:IF B$="" THEN 140 

150 IF B$="B" OR B$="b" THEN Q%=3:N%=0:GOTO 210 
160 IF E$="N" OR B4="n" THEN Q%=0:N%=3:GOT0 210 
170 CL3 P. 1 : LOCATE P.1,4,3 

ISO PRINT P.1," SOLO BLANCAS 0 NEGRAS" 

190 FOR T=0 TO 1000:NEXT T 
200 GOTO 140 

210 DIM C%(10,10), P% (9,9!,Cl% !81 ,C2%(3),CX%!9),CY%(9) 

220 I1%=2:J1 %=2 : 12%=?: 32%=? 

230 FOR I%=0 TO 9 
240 C%(I %,0%)=6:C%:0,I %)=6 
250 C%(9,1%)=6:C%(1%,9)=6 
260 NEXT 1% 

270 FOR I%=1 TO 3 

280 READ C1%( 1%) ,C2%<1%) 

290 FOR 3%= 1 TO 8 

300 READ 

310 C%(I % , 3%)=6 

320 NEXT J%:NEXT 1% 

330 C%(4,4)=3:C%(4,5)=0:C%(5,4!=0:C%(5,5)-3 

340 FOR K%=1 TO 58 

350 READ AR%, BR*A, CR%, DR% 

360 PLOT AR%,BR%:DRAW CR%,DR%,0 
370 NEXT K% 

330 GOSUB 1460 

390 IF S%=3 GOTO 770 

400 C.LS M: INPUT P. 1 , " A SUE FILA MUEVES” j E% 

410 IF E% <1 OR E% >3 GOTO 400 

420 LOCATE P.l , 1,3: INPUT Ptl,“ A SUE COLUMNA ; D% 

430 IF D% <1 OR D% >8 GOTO 420 
440 IF C% <D%,E%)=6 GOTO 480 

450 CLS P.1 .’LOCATE P. 1,5, 2: PRI NT P.1, 11 ESTA POSICION ESTA OCUPADA !" 

460 FOR T=1 TO 1000:NEXT T 
470 GOTO 400 

480 PLOT 270*<30*D%),70+(30*E%):DRAW 290+( 30*D%) , 89+(3C*E%) , <3% 

490 PLOT 290+!30*D%),70+130*E%):DRAW 270+(30*D%),89+(30*E%>,Q% 

500 GOTO 540 

510 FOR M%= C TO 19 STEP 2:PL0T 270+(30#D%),70+M%+(30*E%) 

520 DRAW 290+<30*D%>,70+N%+f30*E%>,6:NEXT M% 

530 GOTO 400 

540 URX%=0 

550 FOR K%=1 TO 3 

560 UR*/.=0: C3'/.=D%: C4%=E% 

570 C3%=C3%+C1%(K%):C4%=C4%+C2%<K%) 

580 IF C%(C37.,C4%)=N% GOTO 590 ELSE 600 
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390 VR%“VR%+1:GOTO 570 

600 IF C%(C3%,C4%)=6 GOTO 610 ELSE 620 

610 NEXT K%:GOTO 670 

620 IF 0R%=0 GOTO 610 ELSE 630 

630 VRX%-VRX%+OR% 

640 C3%*C3%-C1%(K%):C4%=C4%-C2%<K%) 

630 IF C%< C3%,C4%)=6 GOTO 610 ELSE 660 

660 C %< C3%,C4%)=Q%:GOTO 640 

670 IF VRX%=0 GOTO 680 ELSE 710 

680 CLS (VI : PRINT ft 1, " ESA JUGADA NO ES UAL I DA" 

690 FOR T=1 TO 1000:NEXT T 
700 GOTO 510 

710 e%=e%:d%-d%:vrx%=vrx% 

720 CLS ftl:PRINT ftl,“HAS MQVIDO A LA FILA NUNERO ";E% 

730 PRINT ftl," ’ Y A LA COLUNNA NUMERO 11 ! D% 

740 LOCATE fti,2,4:PRINT ftl,"ESTO TE DA ";VRX%;" CUADRQfS)" 

750 C% (D%, E%) = Q%: GOSUB 1710 
760 GOSUB 1460 

770 CLS ft 1: LOCATE ftl,10,2:PRINT ftl, 11 ESTE ES MI TURNO. . . ! " 

780 P%»0:VRX%=0:VRY%=0 

790 IF I1%*J1%»1 AND I2%#J2%=64 GOTO 860 

800 FOR K%=2 TO 7 

810 IF C%<2,«%) <> 6 THEN I1%=1 

820 IF C%(7,K%) <> 6 THEN I2%=8 

330 IF C%(K%,2) <> 6 THEN J1%=1 

840 IF C%(K%,7) 06 THEN J2%=8 

850 NEXT K% 

860 FOR I%=I1% TO 12% 

870 FOR J%=J1% TO J2% 

880 IF C%(1%,J%)=6 GOTO 1030 
890 NEXT J%.'NEXT 1% 

900 IF P% > 0 GOTO 1000 

910 IF PAS%=1 GOTO 920 ELSE 940 

920 CLS ftl:PRINT ftl," BLOQUEADO ! YO DEED FINALIZAR" 

930 FOR T=1 TO 1000:NEXT TlGOTO 1550 

940 CLS ftl:LOCATE ftl,18,2:PRINT ftl,"I MUST PASS" 

950 GOSUB 2720 

960 IF PAS%=1 GOTO 970 ELSE 990 

970 CLS ftl:PRINT ftl,"BLOQUEADO ! YO DEBO FINALIZAR." 

980 FOR T=1 TO 1000:NEXT T:GOTO 1550 
990 GOTO 400 

1000 IF LC%=0 THEN LC%=1:RANDOMIZE LC%:RL%=RND(LC%! 

1010 CX1%=CX%(RL%):CX2%=CY%(RL%) 

1020 GOTO 1220 

1030 VRX%=0 

1040 FOR K%=1 TO 8 

1050 VR%=0:C3%»I%:C4%=J% 

1060 C3%=C3%+C1%(K%):C4%=C4%+C2%(K%) 

1070 IF C%(C3%,C4%)=Q% GOTO 1080 ELSE 1090 
1080 VR%=UR%+1:GOTO 1060 

1090 IF C%(C3%,C4%)=6 GOTO 1100 ELSE 1110 

1100 NEXT K%:GOTO 1130 

1110 IF VR%*0% GOTO 1100 ELSE 1120 

1120 VRX%=VRX%+VR%:GOTO 1100 

1130 IF 0RX%=0 GOTO 890 

1140 IF P%(I%,J%) < P% GOTO 890 

1150 IF P%(I%,J%) > P% GOTO 1160 ELSE 1170 

1160 P%*P%(I%, J%) •.VRY%=0RXr.:LC%^0:CX%(0)=I%:CY%(0) =J%:GGTO 890 

1170 IF URY% > VRX% GOTO 890 

1180 IF VRY% < ORX% GOTO 1190 ELSE 1200 

1190 LC%=0:VRY%=VRX%:CX%(0)=I%:CY%(0)=J%:GOTO 890 

1200 LC%*LC%+1:CX%(LC%)=1%:CY%(LC%)=J% 
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1210 GOTO 890 

1220 C X 2%=C X 2 %: C X1 %=C X1 %: V R Y %=V R Y V. 

1230 CLS M:PRINT M," YO ELI JO LA LINEA NUMERO "JCX2% 

1240 PRINT M* Y LA COLUMNA NUMERO “;CX1% 

1250 LOCATE P< 1 , 1,4: PRINT M,"ESTO NE DA " ; VRY%; " CUADRO(S)" 

1260 PLOT 270+<30*CX1%),70+(30#CX2%):DRAW 290+(30*CX1%),89+(30*CX2%),NX 
1270 PLOT 290+ <30*CX1%) , 70+ (30*CX2%) : DRAW 270+ (30*CX1%> , 89+ (30*CX2%) , N% 

1280 FOR T= 1 TO 1000: NEXT T 

1290 FOR K%=1 TO S 

1300 VR%=0:C3%=CX1%:C4%=CX2% 

1310 C3%=C3%+C1%(K%):C4%=C4%+C2%(K%) 

1320 IF C%(C3%,C4%)=Q% GOTO 1330 ELSE 1340 
1330 VR%=VR%+1:GOTO 1310 

1340 IF C%(C3%,C4%)-6 GOTO 1350 ELSE 1360 
1350 NEXT K%:GOTO 1400 
1360 IF VR%=0 GOTO 1350 
1370 C3%=C3%-C1%<«%):C4%=C4%-C2%(K%) 

1380 IF C%(C3%,C4%)=6 GOTO 1350 
1390 C%(C3%,C4%)=N%:G0T0 1370 
1400 C%(CXl%,CX2Y.)=Ny. 

1410 GOSUB 2720 
1420 GOSUB 1460 

1430 IF PAS%=1 GOTO 1440 ELSE 1450 

1440 CLS Ri:PRINT M," DEBES PASAR":FQR T=1 TO 1000:NEXT T:GOTO 770 

1450 GOTO 400 

1460 FOR I%=1 TO 8 

1470 FOR J%=1 TO 8 

1480 FOR M%=0 TO 19 STEP 2 

1490 Z%=270+(30*1%):H%=70+<30*J%):W%*H%+M% 

1500 PLOT 2%,W%:DRAW 2%+20,W%,C%(1%,J%) 

1510 NEXT M%:NEXT J%:NEXT 1% 

1520 X%=X%+1 

1530 IF X%«61 GOTO 1550 

1540 RETURN 

1550 CQ%=0:CN%=0 

1560 FOR I%=1 TO 8 

1570 FOR J%=1 TO 8 

1580 IF C%(1%,J%)=Q% THEN CQ%=CQ%+1 
1590 IF C%(I%,J%)=N% THEN CN%=CN%+1 
1600 NEXT J%:NEXT 1% 

1610 IF CQ% > CN% GOTO 1680 

1620 IF CQ%=CN% GOTO 1630 ELSE 1650 

1630 CLS M : LOCATE R. 1,25,2: PRINT R. 1, "BLOQUEADO“ 

1640 END 

1650 CLS P.1: LOCATE M, 5,1: PRINT R.1 , "LLEVAS " ;CQ%;" CUADROSJYO LLEVO “JCN% 
1660 LOCATE P.1, 10,3: PRINT M , “HE GANADO. ..!!!! “ 

1670 END 

1680 CLS P. 1: LOCATE P.1,5, 1: PRINT P.I,"LLEVAS " ; CQ%; ” CUADRQSi " YO LLEVO " }CN% 
1690 LOCATE P. 1,5,3: PRINT P.1, "BRAVO. HAS GANADO !! " 

1700 END 


1710 

1720 

IF C%(2,2)=S% AND (C%(3,1)=N% 
P%(3,1)=1:P%(1,3)* 1 

OR 

C%(1,3)=N%) 

GOTO 

1720 

ELSE 

1730 

1730 

1740 

IF C%(7,7)=Q% AND (C%(8,6)=N% 
P%(8,6)=1:P%(6,8)=1 

OR 

C%(6,8)=N%) 

GOTO 

1740 

ELSE 

1750 

1750 

1760 

IF C%(2,7)=Q% AND (C%(1,6)=N% 
P%(1,6)=1:P%(3,8)=1 

OR 

C%(3,8)=N%) 

GOTO 

1760 

ELSE 

1770 

1770 

1780 

IF C%(7,2)=Q% AND (C%(6,1)=N% 
P%(6,1)=1:P%(8,3)=1 

OR 

C%(8,3)=N%) 

GOTO 

1780 

ELSE 

1790 


1790 IF D%=1 OR D%=8 OR E%=1 OR E%=8 GOTO 1820 

1800 IF CX1%=1 OR CX1%=8 OR CX2%=1 OR CX2%=8 GOTO 1820 

1810 RETURN 

1820 FOR J%=1 TO 8 STEP 7 
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1830 FOR ir.=2 TO 7 

1840 IF CXdX,JX)=NX GOTO 1850 ELSE 1860 
1850 PX(IX+l,JX)=21:PX(IX-1,J%)=21 
I860 IF CX(JX,IX)=NX GOTO 1870 ELSE 1880 
1870 PX<JX,IX+l>=21:PX<JX,IX-1)=21 
1880 NEXT 1% 

1890 FOR IX=2 TO 7 

1900 IF C%dX, JX)=Q% GOTO 1910 ELSE 1920 
1910 PXdX+1,JX)=2:PXdX-l,JX>=2 
1920 IF CX< JX, I*/.) =0% GOTO 193C ELSE 1940 
1930 PX<JX,IX+l)=2:PX<JX,I%-11=2 
1940 NEXT I*/.: NEXT JX 

1950 px< l .2) =1 :p%(1,7) =1 :p%<2. i ) = i :f%< 7, l) =i 
1960 PX (2, S) = 1 : P% ( 7,8) = 1 : PX (8,2) = 1 : PX (8,7) = 1 
1970 FOR I *4=2 TO 7 

1980 IF CX(1,IX-1)=0% AMD C%(1,IX +1)=S% THEM PXd,IX) = 
1990 IF C%(8, I%-1 )=QX AND CX !8, IX+l ) =0% THEN PX(8,IX>= 
2000 IF C%(IX-1,1)=Q% AND CXdX+l,l)=SX THEN P%(1%,1)= 
2010 IF CX(IX-1 f 8!= QX AND C%(IX +1,8)=Q% THEN PXdX,SJ = 
2020 NEXT IX 

2030 FOR J%=1 TO 3 STEP 7 

2040 FOR IX=4 TO 8 

2050 IF CX(JX,IX) O NX GOTO 2140 

2060 ICX=IX-l:IF CX(JX,ICX)=6 GOTO 2140 

2070 IF CX(JX,ICX)=Q% GOTO 2080 ELSE 2090 

2080 I'CX=ICX- 1 : GOTO 2070 

2090 IF CX(JX,ICX)=6 GOTO 2110 

2100 GOTO 2140 

2110 IF ICX=0 GOTO 2140 

2120 IF CXCJX,IX+1)=Q% AND CX(JX,ICX-1>=6 GOTO 2140 

2130 PX(JX,ICX)=26 

2140 IF CXdX.JX) <> NX GOTO 2230 

2150 ICX=IX-l:IF CX(ICX,JX)=6 GOTO 2230 

2160 IF CX(ICX,JX)=Q% GOTO 2170 ELSE 2130 

2170 ICX=ICX-1:GOTO 2160 

2180 IF CX ( ICX,JX)=6 GOTO 2200 

2190 GOTO 2230 

2200 IF IC%=0 GOTO 2230 

2210 IF C%(IX+1, JX)=GX AND CX (ICX- 1 , JX) =£= GOTO 2230 

2220 PX(ICX,JX)=26 

2230 NEXT IX 

2240 FOR I%=1 TO 5 

2250 IF CX(JX,IX) <> NX GOTO 2340 

2260 ICX=IX+i:lF CX(JX,IC%)=6 GOTO 2340 

2270 IF C%(JX,ICX)=0% GOTO 2280 ELSE 2290 

2280 ICX=ICX+1:G0T0 2270 

2290 IF CX (JX., IC%) = 6 GOTO 2310 

2300 GOTO 2340 

2310 IF ICX=9 GOTO 2340 

2320 IF CX(JX,IX-1)=QX AND CX(JX,ICX+1)=6 GOTO 2340 

2330 PX(JX,ICX)=26 

2340 IF CXdX.JX) <> NX GOTO 2430 

2350 ICX=IX+l:IF CX(ICX,JX)=6 GOTO 2430 

2360 IF CX(ICX,JX)=QX GOTO 2370 ELSE 23S0 

2370 ICX=ICX+1:GOTO 2360 

2380 IF CX!ICX,JX)=6 GOTO 2400 

2390 GOTO 2430 

2400 IF IC%=9 GOTO 2430 

241C IF CXdX-1 , JX) =ax AND CX dCX+ 1, JX) =6 GOTO 2430 
2420 PX(ICX,JX)=26 
2430 NEXT I%f NEXT JX 

2440 IF CX(1,1)=NX GOTO 2450 ELSE 2460 

2450 FOR IX=2 TO 6:PXd,IX)=20:PXdX,1)=20:NEXT IX 


25 

: 25 

25 

; 25 
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2460 IF C%(i,3)=N% GOTO 2470 ELSE 2430 

2470 FOR I%=2 TO 6:P%(1%,8)=20:P%(1,9-1%)=20.NEXT 1% 

2480 IF C*A (8,1) =N% GOTO 2490 ELSE 2500 

2490 FOR I%=2 TO 6 : P%(9-1%,1)=20:P%(8,1%)=20:NEXT 1% 

2500 IF C% (8,8) =N% GOTO 2510 ELSE 2520 

2510 FOR I*/.=3 TO 7: P% (1%, 8) =20: P% (8,1%) =20: NEXT 1% 

2520 IF C%( 1,I) <> 6 THEN P%(2,2)=5 

2530 IF C*/.(1,S) <> 6 THEN P%(2,7)=5 

2540 IF C%(8j1) 0 6 THEN P%(7,2)=5 

2550 IF C%(8,8) <> 6 THEN P%(7,7!=5 

2560 P%(1, l)=30:P%<i,8)=3C:F%!S, 1 ) =30; P'/» (S, S) =30 

2570 FOR I%=3 TO 6 

2580 IF C%(1 ,1%)=N% THEN P% (2,I5l)=4 
2590 IF G%<8,1%)=N% THEN P%(7,I%)=4 
2600 IF C%(1%,1)=N% THEN P% (1%, 2) =4 
2610 IF C5i( I'A,8) =N% THEN P%( 1%, 7) =4 
2620 NEXT 1% 

2630 IF C%!7, 1 )=Q% AND C% < 4,1)=N% AND CV. <6,1)=6 AND C%(5,1)=6 THEN 

2640 IF C%(1,7)=B% AND C%(1,4)=N% AND C%(1,6)=6 AND C%(1,3)=6 THEN 

2650 IF C%(2,1)=0% AND C%(5,1)=N% AND C%(3,1)=6 AND C%(4,1)=6 THEN 

2660 IF C% (1,2)=G% AND C%(1,5)=N% AND C*<1,3)=6 AND C%(1,4)=6 THEN 

2670 IF C% (8,2) =Q% AND C% (8,5) =N% AND C*/. (8,31=6 AND C%<8,4)=6 THEN 

2680 IF C%(2,8)=G% AND C%(5,8)=N7. AND C%(3,8)=6 AND C%(4,8)=6 THEN 

2690 IF C%(8,7)=0% AND C%(8,4)=N% AND C%(8,5)=6 AND C%(8,61=6 THEN 

2700 IF C% (7,8) =0% AND CV. (4,3') =M‘/. AND 02(5,8)=6 AND C%(6,3)=6 THEN 

2710 RETURN 
2720 PAS%=0 
2730 FOR I%=1 TO 8 
2740 FOR J%=1 TO £ 

2750 IF C%(I%,J%>=©% GOTO 2780 
2760 NEXT J%:NEXT 1% 

2770 PAS%=1:RETURN 
2780 FOR K%=1 TO 8 
2“’90 UR%=0: C3%=I%: C4%=jy. 

2800 C3%=C3%+C1 % (K%):C4^=C4%+ C2%(K%) 

2310 IF C3T. < 1 OR C3% > 3 GOTO 2820 ELSE 2830 
2320 NEXT K)4:60T0 2760 

2830 IF C4V. < 1 OR C4% > 3 GOTO 2820 ELSE 2840 
2840 IF C%!C3%,04%)=N% GOTO 2350 ELSE 2360 
2850 UR%=VR*/,+ l : GOTO 2800 

2360 IF C*/.(C3%, C4%i =Q% GOTO 2820 ELSE 2370 
2870 IF UR% > 0 THEN RETURN 
2880 GOTO 2320 

2890 DATA 1,0,30,1,20,10,10,20,1,30,1,1,1,1,3 
2900 DATA 3,3,3,1,1,0,1,20,3,5,5,5,5,3,20,-1,1,10,3,5 
2910 DATA 0,0,5,3,10,-1,0, 10,3,5,0,0,5,3,10, -1 

2920 DATA - 1,20,3,5,5,5,5,3,20,0, -1,1,1,3,3,3,3,1,1,1,-1,ju, 

2930 DATA 263,100,263,120,270,130,255,130,255,130,255,140,255, 

2940 DATA 270,140,270,150,270,150,255,150,255,160,270,160,270, 

2950 DATA 270,180,255,180,270,170,255,170,270,1 90 ,270,210,270, 

2960 DATA 255,200,255,210,255,270,270,220,270,220,270,230,270, 

2970 DATA 255,230,255,240,255,240,270,240,255,250,270,250,270, 

2930 DATA 270,260,255,260,255,250,255,270,270,280,270,300,270, 

39«0 DATA 255,310,255,330,255,330,270,330,270,330,270,310,270, 

3000 DATA 255,320,270,320 
3010 DATA 310,355,310,375,350,355,335,355,335,355,335,365,335,365, 
3020 DATA 350,365,350, 375 , 35 0,375,335,375,365,355,330,355,380,355, 
3030 DATA 380, 375, 365,3-75, 330,365,365,365,410,355,410,375,410,365 
3040 DATA T95,365,395,375,425,355,440,355,440,355,440,365,440,365, 
3050 DA T A 425,365,425,375,425,375,440,375,455,375,455,355,455,355, 
3060 DATA 470,355,470,365,470, 365,455,365,485,375,500, ST'S, 500, 

3070 DATA 515,375,515,355,515,355,530,355,530,355,530,375,530,375, 
3080 DATA 515,365,530,365 


P% < 6 , 
F'% (1 , 
P% < 3, 
F'% i 1, 

py. <8, 

P%<3, 

py. (8, 
py. (6, 


1) =26 
6) =26 
1) =26 
3) =26 
3) =26 
8) =26 
6) =26 
8) =26 


, 1 , 20 , 10 , 10 , 20 , 1 , 
,140,270,140 
,160,270,180 
,200,255,200 
,230,255,230 
,250,270,260 
300,255,300 
310,255,310 


350.365 
JsJ , o / 5 

395.365 

425.365 

470.355 

500.355 
515,375 


30 
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LUCHA ELECTRICA 



L objetivo de este juego para dos personas es el de hacer 
bianco sobre el contrario evitando al mismo tiempo ser 
alcanzado por sus disparos. El jugador que antes logre 
acertar nueve veces sobre el contrario se proclamard 
vencedor de la lucha. El control del programs se realiza mediante 
dos joysticks o teclado para esta opcidn las teclas utilizadas son 
las siguientes: 



JUGAOOR1 

JUGADOR 2 

ARRIBA: 

A 

F6 

ABAJO: 

Z 

F3 

DISPARO: 

X 

F7 
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10 REM ****** LUCHA ELECTRICA ****** 

20 REM ***** PARA DOS JUGADORES ***** 

30 REM ***** AMSTRAD USER 1986 ***** 

40 REM 

50 DEFINT a-z 
60 MODE 0 
70 GOSUB 1050 
80 GOSUB 1470 
90 GOSUB 280 
100 GOSUB 1470 
110 GOSUB 1360 
120 ’ 

130 ' 

140 REM comienzo 

150 IF -fin THEN GOTO 100 

160 GOSUB 240 

170 CALL 8zBD19;IF pldir THEN GOSUB 580 ELSE CALL kBD19;CALL kBD19 
180 CALL kBD19:IF p2dir THEN GOSUB 640 ELSE CALL &BD19:CALL &BD19 
190 IF p1sa=-1 THEN GOSUB 700 
200 IF p2sa=-1 THEN GOSUB 760 
210 GOTO 140 
220 ’ 

230 ’ 

240 IF j THEN 380 ELSE 480 
250 ’ 

260 ’ 

270 5 

280 CLS:PEN 6 

290 PRINT:PRINT" CONTROLES DEL JUEGO" 

300 PRINT: PRINT: PRINT: PR TNT “"TECLADO (T)": PRINT: PRINT TAB (11)," 0 JOYSTICK (J)" 
310 IF NOT J THEN LOCATE 17,10:PRINT" ":LOCATE 13,7:PRINT"*"ELSE LOCATE 13,7:PRI 
NT" 11 : LOCATE 17, 10: PRINT”*" 

320 IF NOT(INKEY(51)i THEN j=0 

330 IF NOT(INKEY(45)) THEN j=-l 

340 IF NOT(INKEY(18)) THEN RETURN ELSE 310 

350 ’ 

360 ’ 

370 ’ 

380 pl=J0Y(0) ,*p2=J0Y(l) 

390 p1dir = <p1 AND l)*-l + (pl AND 2)*0.5 
400 p2dir=(p2 AND l)*-l+(p2 AND 2)*0.5 

410 IF PI AND 16 THEN p15a=p1sa-1:IF plsa=-l THEN AFTER 15 GOSUB 820 

420 IF P2 AND 16 THEN p2sa=p2sa-1:IF p2sa=-l THEN AFTER 15 GOSUB 820 

430 IF plsa THEN pldir=0 

440 IF p2sa THEN p2djr=0 

450 RETURN 

460 ’ 

470 ’ 

480 p2dir =( (INKEY(4)=0)*1) + ((INKEY(5)=0)*-1) 

490 pldir=((INKEY(69)=0)*1) +((INKEY(71)=0)*-1) 

500 IF INKEY(63)=0 THEN p1sa=p1sa-1:IF plsa=-l THEN AFTER 15 GOSUB 820 

510 IF INKEY(10)=0 THEN p2sa=p2sa-1:IF p2sa=-l THEN AFTER 15 GOSUB 820 

520 IF plsa THEN pldir=0 

530 IF p2sa THEN p2dir=0 

540 RETURN 

550 ’ 

360 ’ 

570 ’ 

530 pt=p1wp+p1dir:IF pt>25 OR pt<6 THEN RETURN ELSE plwp=pt 
590 pl,din.=0 
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600 PEN 1 : LOCATE 3,plwp:CLS #3:PRINT CHR$ < 209 );: RETURN 

610 ’ 

620 ’ 

630 ’ 

640 pt=p2wp+p2dir:IF pt>25 OR pt<6 THEN RETURN ELSE p2wp=pt 

650 p2dir=0 

660 PEN 2:L0CATE 18,p2wp:CLS #5:PRINT CHR*<211 );: RETURN 

670 ’ 

680 ’ 

690 ’ 

700 PAPER #4,4 :WI NDOW #4,4,17,p1wp,p1wp : CLS#4 : CALL &BD19:CALL &BD19 

710 PAPER #4,0:CLS#4 

720 GOTO 580 

730 ’ 

740 ’ 

750 ’ 

760 PAPER U6 , 5: WINDOW #6 , 4 , 17 ,p2wp,p2wp : CLS#6 : CALL 8<BD19:CALL &BD19 

770 PAPER #6,0: CLS46 

780 GOTO 640 

790 ’ 

800 ’ 

310 ’ 

S20 pwpe=(plwp=p2wp) : IF plsa AND N0T(p2sa) AND pwpe THEN p1sc=p1sc+1 : SOUND 132,1 

20,10,0, r, 0:PRINT#lTa*(pisc)HIF pisc=9 THEN 920 

830 IF p2sa AND NOT(plsa) AND pwpe THEN p2sc=p2sc + 1 : SOUND 132,100,10,0,1,0 : PRINT 
#2,a$(p2sc) ;: IF p2sc=9 THEN 920 

840 IF plsa THEN SOUND 132,40,70,0,1,1 

350 IF p2sa THEN SOUND 132,56,70,0,1,1 

860 plsa=0 

870 p2sa=0 

880 RETURN 

890 ’ 

900 ’ 

910 ’ 

920 PEN 6 

930 LOCATE 5,10 : PRINT*FINAL PARTIDA" 

940 IF plsc=9 THEN INK 1,2,20:INK 2,0 ELSE INK 2,6,17:INK 1,0 

950 SOUND 129,1000,0,12,3:SOUND 130,900,0,12,3 

960 WHILE I NKEY$< >"": WEND 

970 t ! =TIME:WHILE t ! +2000 > TIME : WEND 

980 WHILE INKEY*=“ ": WEND 

990 CLS 

1000 -f i n = - 1 

1010 RETURN 

1020 ’ 

1030 ’ 

1040 ’ 

1050 a$ ( 0 ) =".1 1 i 101101 1 01 i 11 " 

1060 a$<1 ) ="011001001001001 " 

1070 a*(2)="111001111100111" 

1080 a*(3)="111001111001111 " 

1090 a*(4)="100100101111001 " 

1100 aS(5)="111100 111 001111" 

1110 a*(6)="111100111101111" 

1120 a*(7)="111001001010010" 

1130 a$(8)="111101111101111" 

1140 a*(9) =" 111101111001001 " 

1150 FOR n=0 TO 9 

1160 ho=LEN ( a* (n)) 

1170 FOR n2=1 TO ho 


1 

1 

\ 
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1180 IF MID*(a*(n),n2,1)= ”1”THEN MID*(a* < n),n2,1)=CHR*(143)ELSE MID*(a*(n),n2 
, 1)=CHR*(32) 

1190 NEXT n2,n 
1200 ’ 

1210 ’ 

1220 b*= 11 LUCHA ELECTRICA" 

1230 c*=CHR*(32)+ CHR*(164)+” Alexander Martin” 

1240 ENV 1,=?,2000:ENT -1,6,3,1 

1250 EMV 2,127,0,0,127,0,0,127,0,0,127,0,0,127,0,0 
1260 ENV 3,=9,9000 
1270 ’ 

1280 ’ 

1290 ’ 

1300 BORDER 0 

1310 PEN #4,1:PEN #6,2:PEN #l,i:PEN #2,2:PAPER #1,3:PAPER #2,3:PEN #0,6 
1320 RETURN 
1330 ’ 

1340 ’ 

| 1350 ’ 

1360 INK 0,12:INK 1,2:INK 2,6:INK 3,13:INK 4,20!INK 5,17:INK 6,20 
1370 WINDOW #3,3.3.6.25:WINDOW #5.18.18,6.25 


1380 WINDOW #1,3,5, 1 ,.5:WINDOW #2,16,18,1,5 
1390 CLS:CLS#7:PRINT#l,a*(0);:PRINT#2,a*(0 
1:p2dir = l 

1400 GOSUB 580:GOSUB 640 

1410 SOUND 1, 1000,0,12,2:SOUND 2,900,0,12 
1420 plsa=0:p2sa=0:+in=0 
1430 RETURN 
1440 ’ 

1450 ’ 

1460 ’ 

1470 CLS 
1480 PEN 7 

1490 FOR n=i TO LEN(b*) 

1500 LOCATE 2 + n, 10 

1510 FOR n2=LEN(b*) TO n STEP-1 

1520 PRINT MID*<b*,n2,1) 

1530 LOCATE 2+n,10 

1540 SOUND 135,20*n2,5,12,2,1 

1550 NEXT n2,n 

1560 SOUND 135,100,0,13,3,1,20 

1570 PEN 6:PRINT:PRINT:PRINT:PRINT c* 

1580 t!=TIME:WHILE t!+2500>TIME:WEND 
1590 RETURN 


WINDOW #7,1,20,1,5:PAPER #7,3 
j:p1sc=0:p2sc=0:piwp=5:p2wp=24:pldir= 
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I sta es la familia de ordenadores 
personates AMSTRAD. Una 
familia completa en la que se 
incluye desde el equipo basico de 
introduction a la informatics hasta el 
orientado a aplicaciones 
profesionales, Todo con la filosofia de 
diseno AMSTRAD que ofrece 
ordenadores compactos, listos para 
funcionar sin cableados engorrosos ni 
necesidad de adquirir perifericos 
-con un solo cable a la red- 
e incluyendo paquetes de programas 
de obsequio. 

Todos con una tecnologia 
contrastada y Cable basada en el 
microprocesador Z 80 A, en el 
Sistema Operativo CP/M - el mas 
extendido para ordenadores de 8 
bits- y en una electronics depurada y 
con un riguroso control de calidad. 


Todos con una extensa biblioteca de 
programas que se incrementa dia a 
dia con titulos para todos los gustos y 
necesidades, 

Todos con una asistencia tecnica 
rapida y eficaz que AMSTRAD 

ESP ANA garantiza exclusivamente a 
los equipos adquiridos a traves de su 
Red Oficial de Distribuidores y 
acompaiiados de la Tarjeta de 
Garantia de AMSTRAD ESPANA, 
Todos a unos precios increibles que 
no admiten comparacion con los de 
cualquier otro ordenador personal de 
sus caracteristicas y prestaciones. 


AMSTRAD CPC 464. 


• Microprocesador Z 80 A* 64K 
RAM* 32K ROM* Teclado profesior-. 
con 32 teclas programables. Soniao 
estereo con 3 canales y 8 octavas. 
Resolution de hasta 640 x 200 puntos. 
Texto de 20,40 y 80 columnas. 

27 colores. Conectores mulhuso, 
Centronics, joystick etc... Magnetofono 
incorporado. 

TODO POR: 59.000 pts. (monitor verde) 
90.000 pts. (monitor color) 
EL SUMINISTRO INCLUYE: 

• LIBRO “Guia de Referencia del 
Programador r 

• Manual en Castellano 

• 8 programas de obsequio en cassette 
("Animal, Vegetal y Mineral", 
"Amsdraw", "Plaga Galadica", “Fruit 

} Machine”, “Admiral Graph Spee”, 
"Amsword”, "El Laberinto del Sultan" 
"OH. Mummy") 



























• ivuuiu}Jiuv*caauui o u u .nr igu i\. nmvi~ 

48K ROM (con BASIC Y AMSDOS) • 
Teclado profesional de 74 teclas 
(32 programables). Somdo estereo con 3 
canales y 8 octavas. Resolution de hasta 
640 x 2C0 puntos. Texto de 20,40 y 80 
coiumnas. 27 colores, Conectores 
multiuso, Centronics, Joystick, etc,, 

Unidad de disco (3", 180K por cara) 
incorporados, 

TODO POR: 99.900 pts. (monitor verde) 
127.900 pts. (monitor color) 
EL SUMINISTROINCLUYE: 

• Disco con Sistema Operativo CP/M 2.2 
y lenguaje DR, LOGO 

• Disco con Sistema Operativo CP/M 
Plus y Utilidades. 

• Manual en Castellano 

• Disco con 6 piogramas de obsequio 
(Base de Datos"; "Proceso de Textos I', 

"Ramdom FilesV'Disenador de Graficos", 
"Puzzle", "Animal, Vegetal y Mineral") 




microprocesador de Z 80 A, 256K RAM 
y teclado profesional de 82 teclas 
(n, acento, etc..,). PANTALLA DE ALTA ° 
RESOLUCION con 80 coiumnas por 32 
lineas° de texto. UNIDAD DE DISCO de 
3” y 180K por cara. 1MPRESORA de 
traccion/friction con alineacion 
automatica de papel. 

TODO POR: 129.900 pts. 

EL SUMINISTRO INCLUYE: Prccesador 
de textos LocoScript (en Castellano), 
Sistema operativo CP/M Plus. Mallard 
BASIC con sistema JETSAM (ficheros 
indexados). Lenguaje DR. LOGO, 
Manuales en Castellano. 


NOTA: Es muy importante verificar la garantia del 
aparato ya que solo AMSTRAD ESP AN A puede 
garanttsarle la ordenada repatacion y sobre lodo 
materiales de repuesto oficiales (Monitor, 
ordenador, cassette o unidades de discos). 


ESPWt 


Avda. del Medlterriaeo, 9. Teh. 433 4S 48 • 433 48 18. 
26C01 MADRID 

Delegacion Catalaia; Tarragona, 110 • Tel. 335 10 58. 
08015 BARCELONA 










Iri 


son. 


Rep. Argentina, 22 
41011 Sevilla - Tel. 277295 


PROGRAMAS 

PROFESIONALES 


- 664 - 6128 - 


— 464 — 


Almacen para 1.500 articulos 10.900 Ptas 

Facturacion con IVA . 10.900 Ptas 

Almacen facturacion integrado 12.900 Ptas 

Proveedores . 10.900 Ptas 

Clientes . 10.900 Ptas 

Graficos de empresa . 8.900 Ptas 

Video Club 1.500 peh'culas .... 14.500 Ptas 


Almacen 500 articulos .. 

Almacen facturacion integrada 

Graficos de Empresa . 

Disco Demo . 


Programas para 8256 


3.500 Ptas 

4.500 Ptas 

4.500 Ptas 

1.500 Ptas 


SUSC BIBASE 
POR TELEFONO 

* mas facil, 

* mas comodo, 

* mas rapido 


Telf. (91) 7337969 

7 dias por semana, 24 horas a su servicio 

SUSCRIBASE A 










































TIIULO 



Cuando se trata de presentar numeros y tablas, 
nada como unas buenas graficas, que permiten 
visualizar con rapidez y sin problemas las 
tendencias de los datos. Este magmfico 
programa permite hacerlo tanto para 464 como 

para 664 y 6128. 


i e 3 4 S 6 1 a 3 10 li 12 


LEYENJft: 

ippo 


BARRAS HORIZONTALES 



A 


mgraph es un programa 
de graficas de empresa 
controlado por menus 
para los Amstrad CPC. 
Se pueden introducir y presentar 
hasta cuatro conjuntos de datos 
con hasta doce elementos en cada 
conjunto. Y todo ello en cualquier 
combinacion de graficas de barras, 
linea, barras apiladas y diagramas 
de barras tridimensionales. Se in- 
cluyen tambien graficas de linea, 
que se pueden utilizar para repre- 
sentar un conjunto de datos o una 
comparacion de los conjuntos. En 
los dos casos se listan los porcen- 
tajes relativos y se puede resaltar 
un sector de la tarta sacandolo del 
circulo principal. 

Toda la introduccion de datos en 
el programa se controla por rutinas 
que filtran los datos erroneos y 
mantienen una presentacion 
correcta de la pantalla. La introduc¬ 
cion de datos se hace en una pan¬ 
talla diferente de la que se utiliza- 
ra para dibujar, para que el usua- 
rio no pierda la pista a los datos in- 
troducidos. Se dispone tambien de 
opciones de carga y salvacion de 
datos, asi como de modificacion. 

El formato ganeral admite que 
se introduzcan etiquetas para los 
datos y una opcion que numera au- 
tomaticamente segun los meses 
del ano. Por ejemplo, una entrada 
de 5 daria como resultado los me¬ 
ses de mayo a abril. 

Las graficas se escalan automa- 
ticamente, aunque se puede poner 
la linea base para comparar o for- 
zar un rango de escala determina- 
do. Esto resulta muy util para com- 
paraciones con un nivel dado. 
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El programs incluye aproxima- 
damente 700 bytes de codigo ma- 
quina que dibuja las barras y pro- 
porciona un volcado de pantalla 
con sombras de gris para impreso- 
ras tipo Epson. La rutina funciona 
con la impresora Indescomp. 

El programs se debe salvar a 
cassette o disco antes de ejecutar- 
lo, ya que un fallo en la introduc- 
cidn del codigo maquina puede de- 
jarlo colgado, causando la perdida 
de nuestros datos. El programa in¬ 
cluye sumas de control para mini- 
mizar este problema. 

El programa es compatible CPC 
464 y CPC 664 y 6128. Los u'sua- 
rios de estos ultimos, sin embargo, 
deben cambiar la linea 40 como 
se indica. El problema surge por- 
que el programa usa la sentencia 
FILL, no disponible en el 464. Su 
uso hace mas vistosos los dibujos 
en el 664 y 6128. 

Cuando el programa ejecute 


correctamente y se corrijan los 
errores de introduccion que apare- 
ceran inevitablemente, la espera 
mientras se introduce en memoria 
el codigo maquina se puede aodr- 
tar haciendo los siguiente: 

Saiga del programa mediante 
BREAK. Cambie la linea 60 a: 

■/w) 


MEMORY 


\ 34999: 



LOAD«GRAPHCM, BIN* 

A A 1 

/ ' f/ . 

Borre a continuacion las'lineas 
4000-4160 y salve la/nueva ver 
sic^n con: vw v> 




'V 


SAVE «AMSGRAPH» 

SAVE «GRAPHCM»,B,35059,691 

Para continuar con el programa 
sin perder los datos teclee GOTO 
190. 

Las variables principales usadas 
por el programa son: 


— n: numero de conjuntos da¬ 
tos. 

— a$(): vector de nombres de 
los datos. 

— d(): tabla de datos. 

— e(): vector con las longitudes 
de Ids conjuntos de datos. 

' -r month, month$. 
i 'YCadena con el mes y el ano 
iniciales: 

— msc: linea base para las grd- 
ficas 

— t$, s$, x$, y$. 

Etiquetas de las graficas 

— sc, s, s5: 

Factor de escala, potencia de 
diez (orden de magnitud de los da¬ 
tos) y si es menor que 2,5, 5 6 10 
usada para limitar ei tamano de los 
numeros en los ejes. 

— k: Se usa para introducir va¬ 
riables para la rutina de introduc¬ 
cion d$, dl. cadena de IMPUTy su 
longitud. 


10 REM********************************* 

20 REM* AMGRAPH por John Palmer * 

30 REM********************************* 

40 cpc464=-1:REM POWER A O PARA UTILIZAR EN UN 664 o 6123 
50 SYMBOL AFTER 229:0PEM0UT "dummyMEMORY HI MEM -1:CLOSEOUT 
60 MEMORY 34999:GOSUB 4000:RESTORE 

70 MODE 1:INK 0,0:INK i,26:INK 2,1S:INK 3,6:E0RDER 0:WINDOW#1,1,40,25,25:PAPERS 1 
,3:WIND0W82,1,40,24,25:PAPERS2,3:WIND0WH3,1,40,24,25 
: DEG 

SO DIM opt$(9),b$<5) ,a*(4),d(12,4),e<4) :e!0)=12:FOR + =0 TO 9:READ opt*(+):NEXT: F 
OR + =0 TO 4: READ b$ ! + ) : NEXT : t*= " T I TULO 11 : x$= " E JE X":y 
$="EJE Y” 

90 DATA AMGRAPH,Entrad a de datos inicia 1es,anadir/modificar/visua1ilar,Formato g 
e n e r a 1 , Graf i c o de barra (vert) , Gra-f ico de linea,Graf 

ico de tarta, Gra-f ico de barra 1hor i z ), Gra-f ico de barra 3D, Car gar / Sa 1 var datos 
100 DATA Introduzca el nornbre de los datos,Introduzca datos S=sa1ir,Introduzca o 
pcion requerida,Introduzca numero,Introduzca nuevos 
detal1es 


110 

120 

130 

) 

140 
150 
160 
13, 1 
, 131 
170 
18,1 
14,1 
6.20 
1 30 
74,7 


FOR i =229 TO 255:IF f=233 THEN 130 

READ a 1 , x2 , x3 , x4 , x5 , <6 : SYMBOL -f , 0 , x 1 , x2 , >;3 , x4 , x5, x6,0 

NEXT:FOR +=234 TO 255:year$=year*+CHR$(f):IF +=241 THEN year$=year*+CHR*(23S 


IF +=244 THEN year*=year*+CHR*i243) 

NEXT 

DATA 126,0,126,0,126,0,0,0,146,0,0,0,0,0,254,0,0,0,42,42,42,42,42,42,249,18, 
9,146,93,145,89,93,215,83,31,251,130,243,130,130 

,222,17,222,17,17,222,137,213,250,171,133,138,158,81,81,222,82,81 
DATA 115,138,138,251,133,138,158,31,31,15S,13,17,145,81,74,196,63 ,1 

8.146.97.31.89.93.37.83.145.80.50.80.80.80.159.1 

38.133.250.133.137.73.81.80.53.81.142.123.130.115.10.138.115.222.1 


DATA 


38,13S,133,113,223,4,4,4,4,196,13^,202,234,136,154,1 


68,250,18, 
7 , 209 , 30 , 1 
37,145,81, 


4,68, 132,227, 1 46 , 139 , 1 38,1 46,22 -1 ,20<=, 17,203, 16,1 


“i O'*' z 

190 REM*********************** ********* 
200 REM* Menu * 

210 REM ***** * X ************************* 
220 mHrOlCOSt'B 2190 
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MIKKiaail 


CARGAR/SALVAR 





1) 

Entrada 

de datos 

iniotales 


2> 

aiudir/fiodif io*r/vi«uul izar 1 


3) 

Foma to 

goner*1 


CARGAR/SALUAR o RETORNAR*> (C/'S/R) C 

4» 

Craf i cso 

de barra 

(vert > 


S> 

Grafico 

de 1inea 



• > 

Graf too 

de tort* 


NOMBRE?: tlfm— 

7> 

Graf■co 

d* barra 

Otoris) 


■> 

Graf loo 

de barra 

» 


• ) 

Catrgar/Sa 1 war datot 


=ssammm 





MENU 



230 FOR + = i TO 9: LOCATE 7,+*2 + 3; PRINT USING 11 tt 11 ; f I : PRINT" ) " ; opt* < f i (NEXT 
240 CLSSi:PRINT#1,TAB(9) ; "Seleccicna nurr,ero de opcion" 

250 i$=INkEV$:IF i$="" THEN 250 ELSE ms=ASC(i*) 4S:IF ms<I OR ms>9 THEN 250 
260 IF ri = 0 AND msOZ AMD »s>l AND msd? THEN CLS#1:PRINT#X,TAB (13) "No hay dates ” 
:FOR b=l TO 500:NEXT:GOTO 240 

270 ON ros GOTO 2'3'0 , 400 , 6 50 . 1000 , 1 ' 06 ' 0 , 1 1 '30,1470 ,1590,1 5 i u 
2S0 REM******************************** 

^90 REM* Dates initial as * 

300 REM******* **** ********************* 


310 CLS.-IF ci=0 THEN 350 

720 LOCATE 1 6 , 1 2 * PRINT "CLIIBADO" : LOC A TE 4.14:PRINT"SE HAN 

IORNENTE” : LOCATE 6,16:PRINT" Desea contimiar (S/N)' J 

330 i*=UPPER*(INKEV*):IF :$=“N M THEN 190 ELSE IF 

340 ERASE a*,d,e:DIM a*(4;,d(12,4!,e!4i:e(0S=12 

350 9=0:309UB 219C:F0R + = i TO 12-.L0CATE l,S+f.FRIMT USINi 

360 g = g +1 : G03UE' 1350: IF g=4 THEN 390 

370 CLSttl : PRINTttl, "Desea lntroduc-.tr ajgun dde css <S/N> 
330 i$=UPPER$: INKEV'T! : IF i*=”S" THEN 360 ELSE IF iSO’N" 


INTRODUCI DO DATOS ANTER 
THEN 330 

“t+fi" *, + -, : FRINT") "‘.NEXT 

THEN 330 


3^0 c, = g:GOTG 190 

I***-* ***** 

410 REN* visualizar datos * 

420 REM******************************** 
430 GOSUB 2190:GOSUB 2590:FOR f = l TO 12 
+i=G THEN PRINT “)" ELSE PEN 
1,2):PEN 1 

440 NEXT:FOP g=1 TO 


LOCATE 1,3 + *.* PRINT USING "## "*, + i : IF mo ft t 
PRINT MID$(months,+ *2- 

: L OCA TE 9*9, 6: PRINT USING"£"JgFRINT")": LOCATE g*? + 4-LEN(a 


*(g> ) , 7:PRINT a*(g) 

450 FOR + = i TO e (g) : c*=STR* (d ( + , g! ): LOCATE g*9 + 4-LEN (c$) , S + -f : PR I NT c$: NEXT: NEXT 
460 CLS#2: PR INT#2, "COMMANDOS : M=Menu l=Canbiar 2=anadir 3=cambiar comb 

re 4=ir<ipresor a" 

470 i*=UPPER* (INKEY*! : IF i *=" 11 THEN 470 ELSE IF i$="M" THEN 190 ELSE op=ASC(i$)- 
43:IF op<l OR op 14 THEN 470 

4SO IF op=4 THEN CLS#3:GOSUB 2870:GOTO 460 
490 ON op GOSUB 500,570,610:GOTO 46u 
500 CL3S3:g=l:a=16:IF n>l THEN GOSUB 630:a=0 
510 LOCATE 17-a,22:FRINT + Fi1 a num":c*=b*13) 

520 co!=30-a:k=7:GOSUB 1910:4 =UAL(d*) :IF 1:1 OR +>12 THEN 520 
530 LOCATE 1,22:PRINT SPACE*<32) 

540 l<=0: GOSUB 1910*. IF l'=6ndat OR i=endat + 32 THEN d*=STR* ( d ( i , g ) ) d 1 =LEM ( d*) ‘.GOTO 


2170 

550 d ( + ,g)=UAL(d*) :IF +>e(g) THEN e(g)=f 
560 RETURN 

570 IF n< 4 THEN r.=n +1 ; g = n: GOTO 600 
5SO CLSB31C0SUE 630: CL C42 *.FF.I NTtt2 , TAB ! 9 ) " La c 
s . 11 J TAB (1 1 ) " Desea con t i nc-.ar : o ■ N i 
590 i*=UPF'ER*( INKEYS 1 / : Vr THUJ 460- EL'SE 


r, 1 u ci Ci a " + 37 F T : ^ ) + 11 \ a 
IF *i* \ v" 77 Vf'E* i'j JPO 


contiene 


dato 
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6 0C CLS#3:F0g 1 = 1 10 I 2 : d ' < . g 
0 :RETURN 


I OCAJC g*9 


t l 34 F PINT SPACES CP): N'EX r : GOSUB 1 85 


610 CLSS3Sg=l:IF n>i THEN GOSUB 630 
620 i, = l:GOSUE 1910: aS : g) = ds: RETURN 

630 LOCATE l,22:PRIMT“Colur,',a n -1 j m u : ; G03UB t 910 : g=VAL1 d$ i : IF opOi THEN LOCATE 

I,22:PRINT SPACES(la) 

640 RETURN 

650 REM* X*# ******* X#* *********** ******* 

660 REM* Forma to * 

670 REM******************************-** 

680 GOSUB 2190:LOCATE 1,5:PRINT"1) TJ tula: ":PRINT TABS4)}t® 

690 PRINT SPRINT .-PRINT ”2) Sub titulo: “SPRINT TAB(4>;s$ 

700 PRINT S PRINT : FRINT"3) Etiqueta > 1 : " ;x$ 

710 PRINT: PRINTS PRINT "4) Etiqueta <*fy* 

720 PRIMT:PRINT:PRINf”5! Nivel de gra-ficos: ";msc 

730 PRINTS PRINT: PRINT "6) Opejon ano; " ; 

740 IF mant h=0 THEN PRINT"No" ; ELSE PRINT"Si“ 

750 LOCATE 22,22.* PRINT “Pr i mei- mes ?: "i Month 

760 CLS#1 SPRINTS! , " Pules turner o a carnbi ar M=MENU'“ 

770 i*=UPPER* t INKEYS):IP i*-"" THEN 770 ELSE IF i*="M" THEN 190 ELSE op=ASC(i*i- 
48:IF opt! OR op >6 THEN 770 
30 co 1 — 4 : l eng t h= 06 : IT op = 1 THEN 1 i i‘i= 6 : GC3UB c?i:: t S- 2 $ 

790 IF op=2 THEN lin=I0:GOSUB S90:s$=d$ 

SCO coi = lS: length = 12: IF op =3 THEN i in=*13:SQSU® S90: ,*=d* 

SI0 IF op = 4 HE; 1 in = i 6 : GuoUE 890:y$=d$ 

820 IF np=5 THEM U~6\ GOSUB V91 0: rr,sc=VAl. i d* 

8o0 IF op < >6 THEN 760 

340 CLC81 SPRINTStl , TAB (61 "Opcior, ar.ua 1 ? SS/N/ " 

350 1*=UPPER* SINKEY*)SIF i*="N" THEN month=05 LOCATE 16,22:PRIMT“NO":LOCATE 35,22 
:PRINT"0 ":GOTO 760 

360 IF i*<>"S" THEN 350 ELSE LOCATE 16,^2:PRINT"SI " 

870 c$=" Introduzca el mes de comienzoco1=37Sh=7:GOSUB 1910:month=VAL(di):IF 
month<i OR month M2 THEN 370 

880 month*=RIGHT*(year*, (13-month)*2)+LEFTS(year $. (month-1 ) *2):GOTO 760 

890 PAPER 2:LOCATE co1, 1inSPEN 3 S PRINT CHR*(143)i:PEN OSPRIMT SPACE*!length):d$= 

"":IF ms=3 THEN c*=b*(4) ELSE c*=b*(0) 

900 CLS# 1: PRINT81 , TAB (21 -LEN (c*) /2) ci 

910 j*=INKEY*:IF i*=»" THEN 910 ELSE i=ASC(i*) 

920 IF i = 127 THEN IF d*<>"" THEN LOCATE co1 *LEN (d*) , 1in:PR I NT" ":d* = LEFT*!d*,LEN 
(d*)-1);GOTO 970 ELSE 910 

930 IF i=13 THEN IF ms=9 AND d*="" THEN 9S0 ELSE 990 
940 IF LEN(d*) = 1 ength THEN 980 
950 IF i<32 OR i>126 THEN 980 
960 d*=d*+i* 


970 LOCATE col, 1 in:PRINT d*;:PEN 3:PRINT CHR*<I 43) :FEM 6:GOTO 910 
930 CLS#1 sPRIMTttl. TAB (10) "*# Entrada in.alida If*": SOUND i , 754 FOR b=l 
:GOTO 900 


500:NEYT 


990 PAPER 0:PEN I:LOCATE col ,1 in:PRINT d* + SPACE*(1 + length-LEN<d*)):RETURN 
1000 REM X********************** ******** 

1010 REM* GRAFICO DE EARRAS * 

1020 REM ********** ********************* 

1030 GOSUB 21v 0:GOSUB 2230 

1040 IS d1=1 THEN wid=30 : disp=0 ELSE IF d1=2 THEM wid=14Sdi5p=15 ELSE IP d1=3 TH 
EN wid=12:di sp=8 ELSE uid=10:disp=7 

1050 POKE SiSSEE, wi d; POKE feSSEF,disp;CALL 8,SSF3:GGTO 2730 
1060 REM******************************* 

1070 REM* ; GRAFICO DE LINEAS * 

I0S0 REM******************************* 

1090 GOSUB 2190:GOSUB 2230 

1100 FOR a=l TO dl:g=VAL(MID$(d$,a,1)) 

1110 rr NOT cpC4£4 AND g = 4 THEN MASK 136,C:GRAPHICS PEN ,1 

1120 : 1 = 132:y1 = 112+(120 AND m=0.5) + !d (1,q1 msc)*sc:PLOT 1000,1000,g-(2 AND g=4): 

FOR 1=2 TO e < g) 

1130 ( ig%=(d i-f ,g!-d ( f - 1 ,g) ) *=.c : IF NOT (cpc464 AND g=4 i THEN MOVE M,yi:DRAW xl+4 
0 , y 1 + f i g» 

1140 IF c pc 464 AND g=4 THEN I. d = SER ( 1600*1 i g%*f i g%) : > = 40/hyp: y=l ig%/h>p;F0R b=0 
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TO hyp STEP 8:FL0T v1+b*x, >||<b*y; NEXT 
xT =x 1 + 40 : y 1 = y 1 * + i g%: NEXT 
IF NOT c p c 4 £ 4 AND g = 4 THEN MASK 255,1 
NEXT ' PLOT 1000.1000,1: GOTO 2^30 
REM**#**X***X **** ****** *********** 

REM* Graficos de tarta X 

REM************** X*** X**X********* 

QOSUB 2190:h=0:cross=0:IF n=l THEN g=r,: f ir, = e(g):IF e;g)<2 THEN 1320 ELSE 12 

LOCATE 1,5: PRINT "Par flies a pa*' eolunnas (F/C)" 
i*=UPFER*(INk'EY*i:IF i*\)“F" AND i *< >“C" THEN 1230 
LOCATE 32,5:PRINT i*lIF i*="C THEN 12^0 

cross=l: i in=n:LOCATE 1,12:PR I NT"Fi1 a num:“:k=5:GOSUB 1910 
f«VAL<d*> ! IF F >MAX ! e ! 1 5 , e ' 2) , e > 3S , e {4 ! ! THEN 1250 ELSE 1290 

GOSUB 2230:L0CATE 1, 1 6: PR I NT" que dates'?" : L=4: GOSUB 1910;g=VAL (d*) : F in=e <g) : 
IF e < g)<2 THEM 1320 
1280 h = 0: IF efgHI THEN 1320 

1290 CLSH3: LOCATE 1 , 1 S : PR I NT 11 Eaac * a 1 gun s agree 1 n t o i e s a 1 t a d o ( w / N) 

1300 i*=UPPEF:*(INKEY*):IF i*="N" THEM 1320 ELSE IP 1*<>"S" THEN 1300 

1310 LOCATE 31,19: PR I NT i*:LOCATE 1,22; PRI NT" Segmsn t □ nurn " n t r ocl u i c a burner 

a a resal tar 11 : col = 13: L-3:GOSUB 19101 h = VAL (d*> 

1320 tot=0:FOR a=1 Tj Tin:IF cross=0 THEN f=a ELSE g=a 
1330 tot^tot+ABbId IT,g) )1NE IT 

1340 GOSUB 2580:LOCATE 30-cross*£,4:PRINT"For ceil tajes":LOCATE 1,4:IF cross=C THE 
N PRINT a*(g) ELSE IF rnonth = 0 THEN PR I NT "F i la: " J f E 
LSE PRINT"MES:":MID*(month*,<*2-1,21 

1350 r,titnb* = " 8 11 : v ar =0 : FOR a»l TO T i n ‘.ORIGIN 200,1S41IF cro5S=0 THEN T=a ELSE g = a 
1360 seg=3S0*ABS-(d(T,gl)/tot:IF a = h THEN ORIGIN 200<20*SIM(var+seg/2),1S4+20*C0S 
I van +seg ■ / 2) 

13^0 ti = uar: l-JHILE b -vat t seg: DRAW 1 20*S IM (b 1 , 1 20*C0S (b 1 : b = b + 6: WEND 
1330 var=var+ seg:DRAW 120*3 IN(van) , 120*COS(var) :DRAW 0,0 

1390 MOVE l 10*SIN 1 var -seg/21.1 1OXC0S (var-seg/2) IF MOT cpc464 THEN FILL a MOD 4 
1400 IF seg ( 12 AND aOh THEN PEN 2:L0CATE 29* c r oss*6, 5 » a: PR I NT " * “ 1 LOCATE 29,23:P 
PINT"* Si r, etiqueta en el gi a! i l r: PEN 1;G0T0 1430 

1410 MOVE 130XC IN (v a, sag/2) + (16+ < 16 AND (a 9 OR (monthOO AND c r oss=0 ))))*( XF'OS 

1 20 )• 240 , 1 iGXCub ! v ar - seg / 2! +16X ( i F'Ob + 1 10) / 24 O ■ TAG. I 

F a?9 THEM numb* "Hit" 

1420 IF Riant hi 10 AMD rras5=G THEN PRINT MI D* (mar, t h*, a* 2 1,2); ELSE PRINT USING n 
urnb*; a; 

1430 TAGOFF : OPIG IN 200, 1S4 : LOCATE 30 - cr oss*£, 5 + a: IF cross = 0 AND monthOO THEN PR 
INT MID*(month*,a*2~l,21; ELSE PRINT USING numb*;a; 

1440 PRINT"1IF cross-1 THEN PRINT a*(g); 

1450 PRINT TAB (34 ! USING " 8 Hit. 8 8 “ j 1 00* AES (d ( f , g ) ) /tot; : PR INT " %" 

14 60 NEXT: OP] MN 0,0; GOTO 2810 
1 4 "’A PEN X X X * X X X X X X X ********** X X* X X X X *** X * * X 

1 .Hr: PEN* C-R A c ICO DE PARRAS HOF; 1 20! IT ALES X 


1150 
1160 
1 170 
1 ISO 
1190 
1200 
1 21C 
90 

1220 

1230 

1240 

1250 

1260 

1270 
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SjDRAWR 480,0:NEXT 
iDRAWR 4,0:PLOT i0uO,10o0,2:M0yE 
El-SE PRIM 


’0, 4* 


: MOVE 106+4*48,100! GOSUB 8910: NEXT 
-8i PR I NT y$i:IF s>2 THEN PRINT" < x' 


LEMix*):MOVER -16,-16:PR I NT 


1490 REM* XX-XXX-XXX X **X ** X ** * * * X * X **** ****** 

1500 GOSUB 2190: GOSUB 2230 

1510 PLOT 1 12,352: DRALIR 0,-240:DRAWR 480,0 
1520 IF gr 1.1 = 1 THEM FOR 4 = 1 TO 12:MOVE 112, 4#20+111 
1530 TAG:FOR 4 = 1 TO 12:PL0T 106,4*20+102,1: 

20 + 108: IF manth =0 THEM PRINT USING "ft4";4: 

T MID*(month*,4X2-1,21 i 

1540 NEXT: FOR 4=0 TO 10:PLOT 11 2+ 4 *48, 108,1: DRAWR 0,4+1240 AND gr- i d = i 1 : NEXT 
1550 PLOT 1000, 1000,2: FOR 4=0 TO 10 STEF' 2: 

1560 PLOT I 000, 1000,3:MOVE 354-16XLEN(vS)/l 
STR$(10“!5-21 

1570 MOVE 60,246 +16XLEM ( x*) /2.' FOR 4=1 TO 
) i :NEXT 

1580 TAGOFF: CALL 8<S965;G0TQ 2730 

1590 REM******************************* 

1600 REM* GRAFICOS 3D * 

1610 REM******************************* 

1620 GOSUB 2190:GOSUB 2230 

1630 FOR b=C TO d1:MOVE 160+b#20,276+b#20:DRAWR 0,-100:DRAWR 384,-144:NEXT 
1640 FOR b=176 TO 276 STEP 20:MOVE 156,b:DRAWR 4,0:DRAWR d1*20,d1*20:DRAWR 384,- 
144:NEXT 

1650 FOR b=t TO 12:M0VE 1 60 + b*32 , 1 76-1 *1 2 : DRAWR d 1 *20 , d I *20 : DRAWR C,10C:NEXT 
1660 TAG:PLOT 1000,1000,2:FOR 4=0 TO 10 STEP 2:MOVE 156,182 +4* 101GOSUB 2910:NEXT 
1670 GOSUB 2960:PLOT 1000,1000,2:FOR b=0 TO 11:MOVE 152+b*32,166-b*i2 
1630 IF manth = 0 THEN MOVER -4,0:PRINT USING "##"ib + 1; ELSE PRINT MID*(month*,b*2 
+i,2i; 

1690 NEXT: PLOT 1000, 1000,3: MOVE 273-20 *LEN < x$) /2, 90 + 3*LEN ( >,*) 12: FOR b = l TO LEN<* 
*) :MOVER 4,-3:PRINT MID*(x*,b, 1) j :NEXT:TAGOFF 
1700 CALL L39DD:GOTO 2730 
1710 REM******************************* 

1720 REM* CARGAR/SALVAR DATOS * 

1730 REM***# ******* X ***** ************** 

1740 OOSUE 2!90:LOCATE 1,5:PRINT"CARGAR/SALVAR a RE TORNAR7 (C/S/R) "; 

1750 s=0:i*=UPPERS(INKEY*):IF i*="R" THEN 190 ELSE IF i*="S" THEN s=l ELSE IF iS 
O'C” THEN 1750 

1760 IF 5 = 1 AMD n = 0 THEM CLS#1:PR I NT# 1 ,TAE(12)"No hay datos":FOR b = l TO 1000:NEX 
T: CLS#3:GOTO 1750 

1770 PRINT i*:LOCATE 1,12:PRINT"N0MBRE7:":1ength=8:3in=12:col=16:GOSUB 890 
1730 PRINT:PRINT:IF s=l THEN 1820 

1790 OPENIN d$: INPUT#9, n , rnsc , t$, s$, x$, y$, month: IF monthOO THEM INPUT49, month* 
1800 FOR g=1 TO n:INPUT#9,e(g1,a*(g):FOR 4=1 TO 12;INPUT#?,d<4,g>!NEXT:NEXT 
1810 CLOSEIN:GOTO 190 

1820 OPEMOUT d*: WRI TE#9, n , rnsc , t*, s*, x*, y*, niont h: IF monthOO THEN WRITE#? .month* 
1830 FOR g=1 TO n:WRITE#9,e(g),a*(g):FOR 4=1 TO 12:WRITE#?,d(f,g):NEXT:NEXT 
1840 CLOSEOUT:GOTO 190 

1850 REM******************************* 

1860 REM* ENTRADA DE BATOS * 

1370 REM******************************* 

1880 locate g#?, 6: : PRINT USING"# 11 ; g;: PRINT*) 'i k = l: GOSUB 1910: a* (g) =d$ 

1890 FOR 4=1 TO 12:k=0:GOSUB 1?10:IF i=endat OR i=endat+32 THEN 1900 ELSE d(4,g) 

=VAL<d$):NEXT 

1900 e(g)=4 - 1:RETURN 

1910 REM******************************* 

1920 REM* RUTINA PRINCIPAL DE TECLADO * 

1930 REM******************************* 

:endat=69:excep=47 E 


1940 

IF 

k = 0 

THEN 

1in=4 +8:1ength=7:maxim = 57:minim = 45:c* = b*(I) 

LSE 

endat=25 

i 6: exc 

ep = 0 

1950 

IF 

k=l 

THEN 

1in=7;length=8:maxim=l27:minim=31:c$=b* (0) 

1960 

IF 

k = 2 

T 41 Ell 

1 in=13:co1=24: 1engt h = n:c$ = b$(2) 

1970 

IF 

k = 3 

THEN 

1in=22:length*1 

1930 

rr 

U=4 

THEN 

1 i n = ( 6: 1 e n g t h = 1 

1 990 

IF 

k =5 

THEN 

1 i n = 12: 1 engt h = 2 

2000 

IF 

k=6 

THEN 

1 i n = 19:co1=34:1engt h=6 

2010 

IE 

k = "’ 

THEN 

1i n=22 : 1ength=2 

2020 

IF 

k < 2 

THEN 

col=g*9+4 ELSE IF k>2 AND k<6 THEM col=16 

2030 

IF 

k : 4 

THEN 

disa i m=57: rn i r» i ff:“*1 w CL tE IF L > 1 1 HEM p.'.s.x im —p. J 


43:minim=49 
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:GO 


2040 IF U s '2 AND k<7 THEN c*-b*(3> 

2050 PAPER 2:PEW OiLOCATE co! ■1engt h,1in:PRINT SPACE*(length) : d*="“: d1=0 
2060 CLStfi;PRINTttl,TAE(21 LEN(c*)/2Sc* 

2070 i*=INKEY*:IF i*=“" THEN 2070 ELSE i AST;.3! 

2080 IF i = 127 THEM IF dlOC THEN LOCATE col dl , I in. - PRINT 
TO 2160 ELSE 2070 

20°0 IF i=13 AMO dl<‘,0 THEN 2170 
2100 IF d 1 = 1 ength THEM 21S0 

2110 IF ;=endat OR i =endat-*32 AMD d*="" THEN 2170 
2120 IF i~A& A fit 1; - 0 THEN IF INSTRId*. i*)<>0 THEN 2130 
2130 IF dl >1 AMD i =‘15 AND k = C> THEN 2180 

2140 I" I < w i t'i i * OR i >ma •; i B» OR i=excep THEN 2180 

2150 d*=d*+i* 

2160 d i =LEM !d*) : LOCATE col-d 1 , 1 ir.: PRINT d*:GOTC 2070 

2170 PAPER 01 PEN 1 : LOCATE col - length, 1 i r.: PR I NT SPACE* < 1 eogth d l Wd*; RETURN 

21 SO CLStt 1 : PRINT tf 1 , TAB 11 0) " XX Eiitrada itwaiida #■#“: SOUND t,75:FuR b=l TO 500: NEK 

T:GOTO 2060 

2 1 90 REMX-XXXXXX XXXXXXXXXXXXXXX XX X** X#* X 
2200 REM# IMFRIMIR CAEECERA X 

2210 REMX X X #X X X XX XX X X XXXXIPXXXX X XXX XX XXX 

2220 CLC:PAPER 21PEN OU-QCATE ;21 LENlopt*Cm*)! !2 1,1:PRINT opt*(ms):PAPER 0:PEM 
1:PRINT:RETURN 

2230 REM############X X XXX XXXXXXXXXXXXXX 
224 0 REMX Qua dato 7 # 

2250 EEMXXXXXX XX X XXXXXXXXXXXXXXXXXXXXXX 

2260 IF n-1 THEM d*="1":d1=1:IF ms=8 THEN 2390 ELSE 2330 
2270 PRINT:PRINT:PRINT“Qua dates?":PRINT 

2280 FOR 1 = 1 TO n : PRINT LIS I NG“ # " i 1 i : PR INT" ! ”ia* ! f) : NEXT :IF ms=6 THEN RETURN 
2290 LOCATE 1, IS:PRINT"Bates a rapresertar:":k=2:GOSUE 1910:CLS:IF ms = 8 THEN 236 
0 

2300 REM#######X##*####**############## 

2310 REMX Tendido da 1 ir.eas? * 

2320 REMXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 

2330 LOCATE 4,12:PRINT"Dasaa tendido da 1ineas (S/N)" 

2340 i*«=UPPER* (INKEY*) : IF i*=*S“ THEN g»-id = l ELSE IF i*=■'(«" THEN gi id = 0 ELbE 234 
0 

2350 CL S 

2360 REM##*###**####XXXXXXXXXXXXXXXXXXX 
2370 REMX ESCALA X 

2330 REMXXXXXXXXXXXX XXXXXXXXXXXX XXXXXXX 
2390 LOCATE 14,10:PRINT"ESPERr UN MOMENTO" 

2400 IF ms=7 THEM FOR 1=1 TO 12:d(1,0)=0:FOR a=i TO d11g=VAL(MID*<d*,a,1i 
)=d(f,0)»d;1,g):NEXT:NEXT:d1=1 

2410 5=0: =5=4 : r,i=l : FOR a = l TO dl : IF ms=7 THEN 9 = 0 ELSE g=VAL (NIB* ( d*, a, II ) 

2420 FOR 1 = 1 TO a (g) : 1; =0: b=AB3 ! d (f, g! - i rase AND msi'.'?)) 

2430 WHILE b ' i0: b =b ! 1 0 : U = 1 + 1 : WEND 
24-10 IF k >s THEN s = k : s5 = 4 


; d(1, ■ 
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2450 IF S 6 N!<!M,g; iftsc) = - i THEM „.-0.5 

24^^, JE.'-.T: FOE ( = 1 TO © (gi : b=AB3 ( d ('■f , 9 ) - (rose AMD ms ' • 7 ! > / 1On's 

24^0 IF b/r THEN s5=l ELSE IE b>2.5 AMD S 5 I ;1 THEN s“=2 
24S0 NEXT:NEXT:IF s>2 THEN xsr=2 ELSE sc=s 
2490 IF ms--7 THEN m=i:tfl=LEN<d*5 

2500 sc = 24*-,l*s5/I0- S : IF ms = 5 THEN 2580 ELSE IF ms = S THEN sc=sc/2.4 
2510 REM**** )<-**X*X**X* 

2520 REM* FoLean dates * 

2530 REI'I***,*************** ***** 3f***^*^* 

254o POKE 35001,dI:IF r*s = 4 THEN POKE 35000,114+ <120 AND m=0.5) ELSE POKE 35000,1 
70+ (50 AND m = 0.5) 

2550 FOR a=d! TO 1 STEP- 1: g=VAL ! Ml D* (dt, a, 1} ) : mem= (d 1 - a i if i 3 +35002: POKE roam , 9 : mem 
=mem 11 

,:5d0 FOR f = I TO ©(g): IF r.is=7 THEN POKE mem, AES l d < f , g!*sc ) ELSE POKE mem, I NT ( (256 
AND SON ( (d ( f , g) -msc) ) =-1 ) t ,'d ( f , 3 ) mscHfsc) 

2r-70 mem-mem +1 : NEXT: NEXT 
2530 CL'S 

2590 REM**#*****XX*X******** *********** 

2600 FEW* INERT.MIR TITULOS * 

2610 REM* * * **************************** 

262v‘ PRIM A E ; 2 i L L N , t $ 1 '.-'I J:PRINT 7AB(2i LEN ( 5 $)/2) j 5 $: IF ms*4 OF; ms/5 THEN 

RETURN 

263 0 REM*************** ***** ****************** 

2a 10 REM* Dibbja gca+ica de lines , barras * 

2656 R-M*********************** ************** 

2660 MOVE 112,352:DRAWR 0,-240:MOVE 112,112+i120 AND m=0.5):DRAWR 480,0 

2670 FOR f-132 TO 597 STEP 40:MOLE +,108:CRAWR 0,2:IF giid=I THEN MOVER 20 AND m 

5=4, 2 :DRAWR 0,240 

2680 NEXT IFOR 1 = 112 TO 352 STEP 24:MOVE 103,1:DRAWS 4+(430 AMD gr(d=11,0; HEX7 
jl69Q IAGiPLOT 1000, 1000,2: FOR f=C TO 10 STEP 2; MOVE 103 , 1 1 S +1 *24 : OOSUE 29 10‘.NEXT 
2700 GOSUE 2960 

2710 PLOT 1000, 1000,2: FOR b = 0 TO 11: MOVE b*40+116 (3 AND mon t h=»:0 AND b9) , i00: IF 
month-0 THEN PRINT USING "#»";b+i; ELSE PRINT MIDi ( 
months,b* 2 +l, 2 ); 

2720 NEXT : PLOT 1000, 1000, 3: MOVE 354 -16*LEM (i ,'3 ., 79; PRINT ,;i;: TA 6 CFF '.RETURN 
2730 REM******************************* 

2740 REM* L.eyenda * 

2750 REM** * X *************************** 

2760 LOCATE 1,22-(3 AND ms=Si : PR I NT'’LE YENDA : " 

2770 fqr |=l TO d1:g=VAL(MIC*(d$,f, 1 )):PEN g-(2 AND g=4) 

27SC If ms >5 THEN PRINT CHR*(233-fl AND g=4!-<3 AND g=4 AND ms = » I ; ELSE PRINT 
CHR*(23I-(i AND g=4))i 

2790 PEN I-.FRINT a = (gi;" " ; : IF ms = 3 THEN PRINT 
20tjO NEXT 

2b10 REM*****X ************************ * 

2320 REM* Commandos * 

2330 REM** ***************************** 

id4o LStt i . F FINI HI , 11 COMMANDOS : M—Menu I = I mp t esor = R-Repite" 

2850 ' *=UPFER$; iMk'E’i'* 5 : IF i*='M ,: THEN 190 ELSE IF .*="£" THEN 270 ELSE T -F j** >■ j 
" THEN 2350 

2860 GOSUB 2670:GOTO 2840 

2S ’0 CLSft 1 : PR I NTt) 1 , TAD ( 14) “E-spere ur, mor.'ien to " 

ibou POKE LGBiC,144-(24 AND ms=2i:CALL S:3B09;IF PEEK(35000i=0 THEN RETURN 
2S90 CLSttl ! PRINTS 1, "MO PREPARADA RE IMTENTAR/'CANCELAR (R,/C) u 

■?OAA ; +_i innrn* > 1- .1. . ■1, , , „ . _ .. 


170 ELSE 2900 


*■ —. —... is i 1 , / w y 

2900 i S--UPPER* ( INKEY*; : IF il="C" THEN RETURN ELSE IF \$="R" THEN 
2910 REM******************************* 

2920 REM* Escala grafica * 

2930 REM******************************* 

x94C g=(f - {5 AND m=0.5) ) * 10 A xsc / (s5*m): IF ms s'>7 THEN g=g+ IMT (msc/ 10' v ts-xsc ) ) 

2950 g$-STR$ (g) : MOVER - 16*LEN (gS) ! (1 + I AMD ms=7 ) 1,0: PRINT g$; : RETURN 
2960 x=l 12+(44 AND ms=8) ~16*LEN(g4):y=246+(32 AND ms=S) 

2970 IF 3 >2 THEN * *=" x "+STR* (1C A < s-2) ) : MOVE x , y + 16*LEM ii $)/2: FOR b=l TO LEN(-fS)' 
MOVER - 1 6 , - 16 : PR I NT M IDS (-f $, b , 1 >;: NEXT 

29o0 PLOT 1000,1000,3:MOVE x-(16 AMD s >2),y+I6 *LEN(y*)/2:FOR b=I TO LEN(yS):MOVE 
R -16, -16:PRINT MID*(y$,b,1) ;:NEXT:RETURN 
4000 REM******************************* 
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4010 REMX pokean C/M * 

4020 ReM*#*##*#****#*#**-*####*##******^ 

4030 CL3:PR IMT"POKEANDO COD I GO-MAGUIMA. E3RERE” 

4040 RESTORE 40S0:x=35059:FOR a=0 TO 3:READ a$:tot=C:FOR b=l TO LEN<a*i/2 

4050 c = VAL ( + MID$ (a*, b*2-l ,2) ) :tot = tct+c: POKE >;,c;x = x+l : NEXT 

4060 READ check:IF tDtOcheck THEN PRINT"Error eft lines ";4080+a#10:STOP 

4070 NEXT:POKE 35623,4:POKE 35579,MC:POKE 35530,64:POKE 35581,1:RETURN 

4030 DATA DD21B988DD460026003AB3886FC5E52176C03AEF835F16007S3D280319iSFAEEE1DD23 

BD7E0032F08SC DDEBB060CC5E5D5DD230600' 7 DFEEACD7E002009 

A7F239S9ED444FED42D602380D32F13S3AEESS,9500 

4090 DATA 0F47CDSBSAiCFBE10E23C9EEE1C 11OCECi10AA063EAF21ESS3772310FC3CCDDEEEC93A 
B9SS110D0021BAS3193D20FCE5E5DDEiFDE1217400060CC5rDE5 
DD23DDE53AB°38471i7200C5060DDD2BFD2E10,9703 

4100 DATA FAFD7E0032F0S8CDDEBE-E5DD7E00A72S2S3D6F602922F13SE1E506C7CDE3SAE5D5CDD3 
3A21000OED5BF18SCDEE8AD1E1232310E8CDC6BB1313E1C110BB 
OF1409DDE 1FDE1C110A3C35639DD21E9SSDD4 6. 11185 

4110 DATA 00C5AFC614 10FC4F2 1 7B00G9EB3ABoo , o26'S06F09C ' 1 Cie5’D5.ED13DD?E-£OT2F'188'260CC5 
BD2306000E20E5EE09EBE10E0CED42DDVE00A72312D5E5F2258A 
ED444FED4232F138CD408AE1D1C110D5DlE10E,9772 

4120 DATA 14EEED42EEED42C11 C/EEC356S93AF08SCDDEEE06G878FE052304FE0320022E2ECDSBSA 
10FOE5D5O101042323CD8ESACDA1SA10F6D1E13AF08SFE04C81B 
1EAF4FCBDEE3CD6B8ACDC6BBC DAD8ACDE3SA11,10699 

4130 DATA 0800626ECDEB8AC9CDD38ACDE38AE5D52AF188110000CDEB3AB1E11313C93AF088FE04 
2005D60ZCEDESBE5D5C5CDC6EBG6G73E0591902804D6C2200923 
2379A72S03C DE38A1 B1BCDE38A1OE4fclD1 ElC9,10372 

4140 DATA 3AF088FE04CCCB402S02D602CDDEE'EC9C5D5E5CDEAEB1S06C5D5E5CDF9BBE1D1C1C91B 
4011533121B2AC440010D0A000003030201020021F5SA06057ECD 
2PED3S0432B383C92310F3219001E51100000E, 3339 

4150 DATA 0206A0C5E521FA8A06C5CDECSEE 1C 1C5D5E5CC9 7SEOE0 2EDBOE1D1D5E50602C52B2BC5 
ESC D9 ■73B06021A0707B6 1223 1 3 1 0F7E1 D 1 C 11 0E821 D93SCDSA8B 
E1D1C113131CCB0D2OEA21FF3ACD3A3EE1A70E,10300 

4 160 DATA Q<§FD427CA"’20.A47DFE ! 02Q9F21 F58ACD8A8BAF32ESSSC90ibG27£CD2BBD30FB3E2310F6 
C9CDF0EB2101SE 1 1 B9S8S' , 06004FC9C9,6093 
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ay una gran defi- 
nicibn de la dife- 
rencia entre 
Hardware y Soft¬ 
ware: jsi le pue- 
des dar una pata- 
da entonces es Hardware! Hardware 
es la electrbnica y la carcasa en la cual 
estci montada. Software son los pro- 
gramas que proyectas sobre el orde- 
nador. Es como un sistema de alta fi- 
delidad —el amplificador, el reproduc- 
tor de cassettes y los altavoces son 
hardware, mientras que la musica que 
pones es software. 

El Hardware de un micro-ordenador 
consta de diferentes partes que inclu- 
yen un teclado para mecanografiar las 
instrucciones y una pantalla (monitor) 
para exhibir los resultados. Esta podria 
ser tu propia television o una pantalla 
espeeialmente inodificada y acoplada 
al ordenador. Sobre ella podrbs repre- 
sentar caracteres alfanumbricos 
(A-Z, 0-9 y puntuacidn) y caracteres 
grbficos especiales para diagramas y 
dibujos. Estos caracteres van desde 
sencillas lineas y cuadrados a compli- 
cados simbolos de juegos. Cuanto 
mbs alta sea la resolucibn de tu pan¬ 
talla, mbs finas entonces pueden ser 
dibujadas las lineas y mas limpias apa- 
recen las curvas. 

Por dentro, el ordenador esta com- 
puesto de circuitos integrados (1C) o 
«chips» —pequehos y sblidos compo- 
nentes electronicos enfundados en un 
plbstico negro. El mas importante de 
estos circuitos es el llamado «Unidad 
Central de Proceso» o «CPU», que Ne¬ 
va a cabo todos los caiculos y dirige 
todo el sistema, trasladando la infor- 
macibn a todas las partes. Los dos mo- 
delos mbs comunes de CPU (Unidad 
Central de Proceso) son el MOS Tech¬ 
nology 6502 utilizado en los ordenado- 
res Commodore, Apple y Atari; y el 
Zilog Z-80 utilizado por Tandy y Sin¬ 



clair entre otros y por supuesto Ams- 
trad. Otros dos CPUs populares son el 
MOTOROLA 68000 y el INTEL 8088. 

El ordenador tiene dos clases de 
memorias. La Memoria de Acceso 
aleatorio (Random Access Memory) 
o RAM que es una memoria temporal 
—-cualquier cosa almacenada en ella 
se pierde al desconectar el ordena¬ 
dor— el tbrmino tbcnico es volbtil. 

La RAM se utiliza para almacenar: 
todos los comandos (instrucciones 
para el ordenador) que mecanograffe, 
el programa que esta habitualmente 
ejecutandose y los datos (informacibn) 
a los que se refiere dicho programa. 
Estos datos consisten en variables»: 
una variable es solo una pieza de in- 
formacion y tiene un nombre que la 
identifica, por ejemplo: PRECIO y un 
valor 5. 

La ROM (Read Only Memory: me¬ 
moria de solo lectura) es una memoria 
permanente -—no puede modificarse, y 
al desconectar el ordenador no se 
borra. La ROM se usa para almacenar 
los programas especiales que dicen al 
ordenador cbmo comportarse. Estos 
pueden incluir el Sistema Operativo 
que capacitara al CPU para dirigir la 
pantalla, el teclado y la memoria a la 
vez. Los sisternas operatives varian de 
una mbquina a otra, aunque hay pocos 
estbndares como el CP/M, MS-DOS y 
el Unix. La ventaja es que los progra¬ 
mas de aplicacibn escritos en un orde¬ 
nador usando un determinado sistema 
operativo, a priori pueden ser compa 
tibles con cualquier otro ordenador que 
utilice el mismo sistema, sin tener en 
cuenta su disefio individual. 

Hay otras clases de memorias, tales 
como PROM, EPROM, EEPROM, e in- 
cluso EAROM, cada una con sus pro- 
pias caracteristicas de realizacibn, 
pero son usadas generalmente sblo en 
aparatos especiales o para propositos 


de desarrollo anteriores a la produc- 
cion a gran escala. 

Todas las formas de memoria son 
medidas con las mismas unidades. Un 
Bit —abreviatura de «Binary Digit» 
(Digito Binario)- es la unidad basics 
de la memoria de un ordeandor, y s6lo 
puede ser usado para almacenar un 
«0» o un «1» —el equivalente a ser 
desconectado y conectado. Estos bits 
se combinan en unidades mayores 
para almacenar informacibn util. Ocho 
bits para un byte y muchos de los 
CPUs procesan un byte de una vez. 
Un byte es generalmente el equivalen¬ 
te a un digito sencillo o un caracter, 
pero puedes representar algo mbs 
abstracto. 

Algunos de los mbs nuevos y avan- 
zados CPUs, como el 68000 y el 
Z8000, procesa 16 bits de una vez, un 
considerable aumento de velocidad. 
jUn proceso corriente puede ser lleva- 
do a cabo en aproximadamente la mi- 
llonesima parte de un segundo! 

1024 bytes hacen exactamente un 
kilobyte o KByte —por lo que un or¬ 
denador de 64 K tiene de hecho 64 * 
1024 b 65536 bytes de memoria. La 
razbn de este numero tan raro es que 
puede ser convenientemente expresa- 
do en «binario», que es el sistema de 
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Aunque para ei principiante pueda ser desconcertante, la jerga 
es una parte necesaria del ordenador: tanto para evitar 
ambiguedades como para ahorrar el espacio, y esta sencilla gui'a 
para las expresiones mis comunmente usadas, jpuede 
convertirle de novicio en experto! 



numeracibn usado por los ordenado 
res. 


El CPU es capaz unicamente de 
operaciones muy sencillas —como su- 
mar dos dfgitos— pero puede hacerlas 
a gran velocidad. Para que se ejecute 
alguna funcibn real, el CPU necesita 
de una larga lista de instrucciones 
—un programa— escritas de una for¬ 
ma que pueda entender; esto es llama- 
do cbdigo mbquina. 

Desgracidamente, es bastante diffcil 
su manejo para los humanos, y consis- 
te de filas de dlgifos; el resultado es 
una programacibn muy lenta y que no 
admits errores. Por tanto, se ban de- 
sarrollado para ordeandores \jarios 
lenguajes de alto nivel, que son bas¬ 
tante parecidos al ingles, y consecuen- 
temente mbs fbcjles de programar. 
FORTRAN es el ienguaje adecuado 
para los calculos de ingenierla, mien- 
tras que la moyoria de los programas 
de gestibn estbn escritos en COBOL. 
Con mucho. el Ienguaje mbs comun y 
tambien mas facil de aprender es el 
BASIC. El mas estandar es el llamado 
Microsoft BASIC y se encuentra en el 
PET, APPLE y muchos otros. 

PASCAL estb alcanzando una gran 
popularidad. Es mbs duro de aprender 
pero mejor para escribir programas lar¬ 


gos e inducir a una buena discipliha de 
programacion a los nuevos programa- 
dores. 

Los programas escritos en un len- 
guaje de alto nivel han de ser transfor- 
mados en C6digos Mbquina antes de 
que puedan ser programados por el 
CPU. Hay dos tipos de programas es- 
peciales que llevan a cabo esta traduc- 
ci6n, el primero es el «compilador» 
que traduce todo el programa al cbdi 
go mbquina antes de ejecutarlo, lo al- 
macena en otro espacio de la memo- 
ria y despubs lo ejecuta. 

El segundo tipo de Basic es el «in- 
terpretado» que actua almacenado el 
programa en Basic y cada vez que lo 
ejecutamos es traducido a cbdigo mb- 
quina linea por Ifnea. 

Generalmente, un programa «inter- 
pretado» tardara unas 10 veces mas 
que uno compilado, pero usarb menos 
memoria porque s6lo se almacena una 
versibn. 

Los «inferpretes» son mbs utiles si 
esta desarrollando un programa debi- 
do a que al descubrir un error —un 
BUG en la jerga de los ordenadores— 
no se necesita recompilar todo el progra¬ 
ma. La diferencia exacta entre «Inter¬ 
pretar" y «Compilar» requiere una ma¬ 
yor explicacibn. 

Si un ordenador estb disenado para 
manejar un numero determinado de 
lenguajes de programacion, los dife- 
rentes «intbrpretes» y «compiladores» 
estarbn almacenados en la RAM. Las 
mbquinas que sblo programen BASIC, 
sin embargo, tienen generalmente un 
«intbrprete» en la ROM. 

A esta clase de software, perma- 
nentemente almacenada en el Hard¬ 
ware, se la denomina a veces [FIRM¬ 
WARE! jY ahora de vuelta al Hard¬ 
ware! 

Los circuitos integrados (1C) se 
mantienen en una «placa de circuito 
impreso>>, que es una tarjeta ri'gida con 
muchas y finas pistas de cobre que in- 
terconectan a los componentes. Real- 
mente algunos ordenadores baratos 
solo poseen una placa de circuito im- 
preso. De los extremos de la placa de 
circuito impreso sobresalen los INTER¬ 
FACES que permiten al ordeandor in- 
tercambiar informacibn con otros apa- 
ratos electrbnicos. Este intercambio es 


conocido por INPUT/OUTPUT o I/O 
(entrada/salida). Un interface estb 
compuesto de varias lineas o cables 
—Ilamados bus— para manejar los da- 
tos (data) y de diferentes senates de 
control necesarias para sincronizar el 
tiempo entre varias operaciones. Las 
secuencias de los acontecimientos 
previos relacionadas con el intercam¬ 
bio de un conjunto de datos son cono- 
cidas por el nombre de protocolo 
—una expresion que proviene sin duda 
de la danza ritual de la diplomacia. 
Esta broma terminolbgica continua en 
una etapa siguiente con una particular 
secuencia de salidas en un interface 
y se la conoce por «handshake» 
(apretbn de manos», esto significa que 
la transaccibn esta completa. 

Hay varies interfaces comunes, asi 
como un buen numero de ellos que 
son propios y oscuros. A menos que 
use un medio especial de conversibn, 
sblo puede interconectar aparatos que 
tengan un mismo interface. 

En Centronic, IEEE 488, el RS232 
y el S-100 son algunos de los estbn- 
dares mbs ampliamente aceptados. 
Los dos primeros son «buses» para- 
lelos, lo que significa que 8-bits son 
transmitidos simultbneamente a lo lar¬ 
go de echo lineas. 

Los perifbricos mbs comunes se 
nombran a continuacibn: 

Las Unidades de Cassetes, que 
guardan los programas y datos de la 
memoria del ordenador en cassette, de 
modo que se puedan volver a cargar 
de nuevo cuando se necesiten. 

El «Disk Drive» hace lo mismo uti- 
lizando una pieza circular de material 
magnbtico que gira dentro de una fun- 
da de cartbn o plbstico que se llama 
Floppy Diskette. Estos tienen gran 
capacidad de almacenamiento y per¬ 
miten un acceso mas rbpido. 

Se utiliza una impresora para pro¬ 
duct copias de la informacibn en pa- 
pel, y generalmente ofrecerb o una 
gran velocidad o una impresibn de alta 
capacidad. 

Por ultimo, un Modem es una pe- 

quena unidad que convierte los datos 
electrbnicos en sonidos audibles y a 
la inversa, de forma que se pueda en- 
viar la informacibn a travbs de una li¬ 
nea telefonica ordinaria. 
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LOS PREMI 


El di'a 15 de 
enero de 1986, 
en presencia del 
notario de 
Madrid, don 
Angel P6rez 
Fernandez, se 
efectud el sorteo 
de los sistemas 
musicales 
Amstrad TS-55, 
entre los 
suscriptores. 


-GANADORES DE LOS SISTEMAS N 


CADENAS HIFI-TS-55 




Dona Carmen Perez 
Vazquez 

Montevideo, local 
12 

21005 HUELVA 


Don Francisco 
Javier Delgado 
Varela 

Villasandino, 9, 3.°, 
2 .° 

28011 MADRID 


• Don Jose Miguel 
Lopez L6pez 
Avda. Carmen 
Miranda, 8, 2.° Izq. 
PRAVIA (Asturias) 


Doha Magdalena 
Olivera 

Rafael Calvo, 7, 4. 

D 

28010 MADRID 
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Don Ricardo Bajo 
Gamez 

Pedro Muguruza, 8 
28036 MADRID 


• Doha Mercedes 
Ibanez de Gracia 
Madrid, 67, 2.° Izq. 
GETAFE (Madrid) 






















S LLEGAN 


Don Juan Carlos 
Mira Navarro de 
LINEA 21, S. A., 
de Alicante, 
realiza la entrega 
del primer 
premio (una 
impresora 
DM P-1) del 
sorteo 

AMSTRADIEZ del 
mes de octubre 
a don Vicente 
Sanchis Verdu. 


MUSICALES AMSTRAD TS-55 


• Don Jose Luis 
Ordonez Ausin 
San Agustm, 17 
09001 BURGOS 


Don Angel Martinez 
Nunez 

Aprestadora, 18, 
4.°-4 ° 

HOSPITALET 

(Barcelona) 


• Don Francisco 
Javier Lopez 
Herrero 
Calderon de la 
Barca, numero 5, 6.°B 
ALCALA DE 
HENARES (Madrid) 

• Don Angel Vazquez 
Gonzalez 
Apartado 46 

Grao de Gandia 
GANDIA (Valencia) 


J 
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CARACTERES EN TECNICOLOR 


i no, tendri'a que construir va- 
rios caracteres que, super- 
puestos, formaran las diferen- 
tes partes del caracter deseado e im- 
primirlos, con plumas diferentes, en 
modo transparente, uno encima de 
otro. Por ejemplo, si quiere un hombre 
con cuerpo azul, pelo rojo y cara blan- 
ca con un ojo, necesitarla un carbcter 
para el cuerpo, otro para el pelo, y otro 
para la cara con un agujero para mos- 
trar el color del fondo a travbs del ojo; 
jy todo esto trabajando en modo 1! Si 
fuera en modo O podria necesitar im- 
primir hasta 17 caracteres diferentes, 
lo cual resulta terriblemente lento. 

As! pues, para aquellos que quieran 
un metodo facil y rapido de imprimir ca¬ 
racteres multicolor (que, efectivamen- 
te, son sprites muy pequenos) en la 
pantalla sin recurrir a «montones» de 
codigo maquina, hemos disenado dos 
sencillos RSXs. IMPUT para imprimir 
cada caracter, o una cadena de carac¬ 
teres multicolor en la ultima posicion 
de impresi6n de texto, y IGPUT para 
imprimir tanto un caracter como una 
cadena de ellos en la posicion del cur¬ 
sor de graficos. 

Para utilizar cualquiera de los dos, 
introduzca simplemente el comando 
seguido de una serie de numeros, se- 
parados por comas. Por ejemplo: 

10 LOCATE 10, 10: IMPUT,0,1,2,1 
20 MOVE 100,100: IGPUT,4 
30 MOVE 200,40:IGPUT,5,6 
40 LOCATE 20,3: IMPUT,7 

Los numeros escritos tras los co- 
mandos no se refieren al juego de ca¬ 
racteres normal, sino a otro que sera 
disenado separadamente y sobre el 
cual hablaremos mas adelante. 

Como puede ver, ambas rutinas son 
sencillas de usar; sin embargo, tienen 
algunas limitaciones. 
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El comando IMPUT no situa el cur¬ 
sor de texto detras del ultimo caracter 
que imprime, asi que si desea mezclar 
caracteres multicolor y normales debe 
utilizar un comando LOCATE detras de 
cada IMPUT. El comando IGPUT situa 
el caracter en la posicion de byte mas 
cercana en la pantalla, lo cual no es 
siempre la posicibn de pixel. Esto sig- 
nifica que puede moverse arriba y aba- 
jo de la pantalla con bastante facilidad 
pero sblo se movera de 8 en 8 bits de 
pantalla a la derecha o izquierda. Esto 
limita el movimiento horizontal a medio 
caracter en modo 1 (cuatro pixels) y un 
cuarto de caracter en modo 0 (dos 
pixels). En modo 0 esto no constituye 
una limitacion excesiva pero si piensa 
que el movimiento serb muy desigual 
en modo 1, pruebe entonces a disehar 
dos o mbs caracteres con la forma que 
quiere ligeramente modificada en cada 
uno, de modo que, imprimiendolos uno 
detras de otro consiga un movimiento 
suave. Esta es la tecnica utilizada en 
el programa de demostracibn. 


PAGUE EL PRECIO 

Hay que pagar un precio a cambio 
de toda esta facilidad de uso: se nece- 
sita mas memoria para cada caracter 
a imprimir. En lugar de los 8 bytes ha- 
bituales, un caracter multicolor en 
modo 1 necesita 16 bytes, y uno en 
modo 0, 32 bytes. Pero esto no es tan 
malo si considers que habria tenido 
que utilizar hasta tres caracteres en 
modo 1 o 15 en modo 0 para conse- 
guir el mismo resultado, y ademas mu- 
cho mas lento. Un caracter en modo 2 
sigue utilizando solo 8 byes y la rutina 
funciona de hecho con el modo 2, aun- 
que hay un pequeno problems para 
comprobarlo, ya que no puede tener 


mbs que una tinta, y deberfa utilizar en 
su lugar el metodo normal del BASIC. 


UTILIZANDO EL 
PROGRAMA 

Primero, teclee el programa 1, sbl- 
velo y ejecutelo. Si ha cometido algun 
error en los DATAS, el programa le avi- 
sarb en que linea se encuentra. Cuan- 
do el programa funciona sin errores, 
salvelo y reinicialice la maquina apa- 
gandola y encendibndola de nuevo. 
Ahora teclee el programa 2 y salvelo. 
Este le permitira disehar sus caracte¬ 
res en cualquier modo que desee y sal- 
varlos en cinta (o disco). 

El programa disehador es muy corto 
y simple. Despubs de decide el modo 
que deseamos, entra en el. Para des- 
plazar el cursor por el caracter, utilice 
las teclas de cursor, y use la tecla copy 
para poner y quitar la pluma. Para 
cambiar la pluma pulse la tecla [P] e in¬ 
troduzca el nuevo numero de pluma. 
Para almacenar el caracter en memo¬ 
ria pulse la tecla [S] y dele un numero. 
Puede tener todos los que quiera 
mientras recuerde cubnta memoria 
gasta cada uno. Para reeditar un ca¬ 
racter introducido antes en memoria, 
pulse [R] e introduzca su numero. 
Cuando haya terminado de disehar ca¬ 
racteres pulse [Q] y, despues de pre- 
guntarle si esta seguro, le preguntarb 
cuantos salvar. Recuerde, el numero 
de Sprites comienza en 0, de modo 
que de 0 a 7 equivale a 8 Sprites. 

Ahora, para ver el fruto de su traba- 
jo, debe reiniciar la maquina y ejecutar 
este programa. 

10 IMPUT «MODO»;MM:MD = 1:IF 
MM <> 1 THEN MD = 2 
















^Corno conseguir caracteres multicolor en la 
pantalla, tanto en coordenadas LOCATE 
como en coordenadas PIXEL? Hasta ahora 
tenia que hacerio en codigo maquina, lo cual 
resulta un tanto excesivo si el 99 por 100 del 
programs funciona suficientemente bien y 
con la rapidez necesaria en BASIC. 


10 ’ 

Programa 1 


20 ’ 

RSX para impresion multicolor 


40 ’ 



50 h 

=HIMEM-1:IF PEEK(0)=0 THEN 70 


60 POKE 0,0:h = h-192:MEMORY < h-1) 


70 lin=1000:direc=h:F0R t=l TO 192 

STEP 8 

80 suma=0:F0R b=0 TO 7 


90 READ a$;a*=UPPER$(a*):n=l 


100 

IF LEN(a*)<>2 THEN 370 


110 

b$=MID*(a$,n,1) 


120 

GOSUB 350:IF a=0 THEN 370 


130 

n=n+1:IF n=2 THEN 120 


140 

p=VAL("&"+a$):POKE direc,p 


150 

direc=direc+1:suma=5uma+p 


160 

NEXT b:READ a 


170 

IF aOsurna THEN 370 


180 

PRINT"LINEA"!1in;"OK":1in=1in+10 

190 

NEXT t 


200 

r=h+9:a=INT<r/256):b=r-(a*256) 


210 

POKE h +1,b:POKE h+2,a 


220 

r=h+17:a=INT(r/256):b=r-<a#256) 


230 

POKE h +4,b:POKE h + 5,a 


240 

r=h+21:a=INT(r/256):b=r-(a*256) 


250 

POKE h+9,b:POKE h+10,a 


260 

r=h+30:a=INT(r/256):b=r-(a*256) 


270 

POKE h+41,b:POKE h+42,a 


280 

POKE h +63,b:POKE h + 64,a 


290 

r=h+31:a=INT(r/256):b=r-(a*256) 


300 

POKE h +122,b:POKE h+123,a 


310 

r=h+194:a=INT(r/256):b=r-(a*256) 

320 

POKE h+31,b:POKE h+32,a 


330 

CALL h 


340 

END 


350 

a=INSTR("0123456789ABCDEF",b*) 


360 

RETURN 


370 

PRINT "ERROR EN LA LINEA 11 j 1 i n J 11 

! ":END 

1000 DATA 01,29,4E,21,31,4E,C3,D1, 

684 

1010 DATA BC,35,4E,18,18,00,18,11, 

408 

1020 DATA 00,00,00,00,00,40,50,55, 

242 

1030 DATA D4,47,50,55,D4,00,00,30, 

708 

1040 DATA 75,F5,AF,18,03,F5,3E,01, 

872 

1050 DATA 32,3E,4E,F1,A7,C8,47,F5,1114 

1060 DATA DD,23,DD,23,10,FA,CD,11,1000 

1070 DATA BC,47,3E,02,90,F5,3A,3E, 

832 

1080 DATA 4E,A7,28,0A,CD,78,BB,2D, 

852 



(Continual 



20 INPUT «CUANTOS 
TES»:S:MODE MM 
30 S = S*16*MD 
40 H = HIMEM - 1 
50 MEMORY (H-S) 

60 H = HIMEM + 1 
70 LOAD «SPRITES» 

que cargaici sus Sprites. 

Ahora puede cargar y ejecutar el 
programa 1 de nuevo. Este movera HI¬ 
MEM y se pondrA a si mismo por enci- 
ma y se activara. Ya puede utilizar los 
RSXs y ver sus Sprites aparecer en la 
pantalla. No Divide que el comando IM- 
PUT no movers la posicidn del cursor, 
asi que si introduce: 

IMPUT,0,0,0 

el mensaje «Ready» sobreescribir& 
sus Sprites, asi que ahada PRINT al fi¬ 
nal del comando. Y recuerde situar el 
cursor de gr^ficos en la pantalla con el 
comando MOVE para poder ver los ca¬ 
racteres, como: 

MOVE 100,100:IMPUT,0 

Bien, ahora deberia tener las rutinas 
funcionando. Hay tres metodos para 
imprimir caracteres. Puede escribir los 
caracteres y borrarlos con IMPUT o 
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1090 DATA 25,CD,1A,BC,18,1B,CD,C6, 910 
1100 DATA BB,B7,CB,1C,CB,ID,CD,11,1055 
1110 DATA BC,F1,F5,A7,28,08,47,B7,1143 
1120 DATA CB,1A,CB,IB,10,F9,CD,ID, 958 
1130 DATA BC,F1,C1,C5,F5,DD,2B,DD,1549 
1140 DATA 2B,4F,06,03,80,47,79,E5, 680 
1150 DATA ED,SB,3F,4E,DD,6E,00,26, 838 
1160 DATA 00,29,10,FD,19,EB,El,87, 930 
1170 DATA 20,01,3C,47,C5,E5,06,08, 604 
1180 DATA 3A,05,00,A7,28,09,FE,01, 534 
1190 DATA 28,OB,FE,02,1A,18,08,1A, 391 
1200 DATA A7,28,05,18,02,1A,AE,77, 557 
1210 DATA CD,26,BC,13,10,E2,El,CD,1122 
1220 DATA 20,BC,Cl,10,D7,FI,Cl,10,1094 
1230 DATA B2,C9,00,00,00,00,00,00, 379 


IGPUT con un car&cter bianco sobre 
ellos. Debe reservar uno de sus carac- 
teres para hacer esto. Tambidn puede 
utilizar el modo XOR para escribir los 
caracteres en la pantalla, con lo cua! 
se combinar&n con lo que tenga en la 
pantalla, en la misma forma que en 
juegos como «Manic Miner» y «Sor- 
cery». Puede borrarlo reimprimiendo el 
mismo car4cter. El tercer m6todo s6lo 
imprimis las partes del car&cter que 
tengan alguna tinta. No imprime bytes 


cero. Supongamos, por ejemplo, que 
s6lo desea un car4cter tamafio “mo¬ 
do 1» pero en modo 0. Si sdlo disena 
medio car4cter, digamos la mitad iz- 
quierda, y deja el resto en bianco, 
cuando lo imprima junto a otro obten- 
dra normalmente el extrano efecto de 
borrar lo que habfa en la pantalla sin 
que aparezca nada en su lugar. Este 
m6todo de imprimir suprime este efec¬ 
to y permite imprimir caracteres peque- 
nos sin un «halo» a su alrededor. Esto 


es casi igual al modo transparente nor¬ 
mal. Esto significa que debe usarse el 
primer m6todo de impresidn si quiere 
borrar algo con un car4cter en bianco; 
de otro modo no ocurrir4 nada. 

Para seleccionar los m6todos, sim- 
plemente ejecute POKE 5,n donde n 
es: 

2 a 255 para impresidn normal. 

1 para impresi6n XOR. 

0 para impresiOn transparente. 

Para ver a la rutina en accidn teclee 
la primera parte del pequeno progra- 
ma de demostraciOn que prepara los 
caracteres. A continuacidn cargue y 
ejecute el programa 1 y despu6s car¬ 
gue y ejecute la segunda parte del pro¬ 
grama de demostracidn para ver un 
bal6n movtendose suavemente a tra- 
ves de la pantalla. 

Como punto final, el programa fun- 
cionar4en cualquier lugar de la memo- 
ria, asf que si ha disefiado un juego de 
caracteres distinto con el comando 
SYMBOL AFTER h4galo antes de car- 
gar y ejecutar los caracteres multicolo¬ 
res y el programa 1 y todo ir4 bien. 


10 ’Programa 2 - DISENADOR DE CARACTERES 

20 INPUT "Modo"jmm:md=l 
30 IF rrnOl THEN md=2 
40 SPEED KEY 10,1:MODE mm 
50 WINDOW#1,l,40/md,24,25 
60 MEMORY 19999 
70 q=l:BORDER 0 

SO PEN 1:tt=TEST(x,398-y):LOCATE INT(x/(2*md))+10,INT(y/2) +1:PRINT CHR*<203) 

90 k*=INKEY*:IF k*='"' THEN 80 
100 kk=ASC(k*) 

110 LOCATE INT(x/<2*md) )+10, INT(y/2)+1:PEN 11:PR INT CHR*(143):PEN q 
120 x=x-(2*md)*( (kk=kF3 AND x< (14*md ) ) - (kk = 8<F2 AND x<>0)) 

130 y = y-2*( (kk=e i Fl AND y< 14) - ( kt^&FO AND yOOH 

140 IF k*="p" OR k*="P" THEN PEN 1:IMPUTttl,"P1uma"iq:PEN q:CLS#l 

150 IF kk=224 THEN te = l-f te=l):PEN 1:LOCATE 1,16:PRINT"OFF":IF te = l THEN LOCATE 
1 , 16:PRINT"ON " 

160 LOCATE 1,1S:PEN 1:PRINT"p1uma "iqi" ":PEN q 
170 IF k*="r" OR k*=”R" THEN 240 

180 IF l,*="s“ OR k$="S* THEN 220 

190 IF k$= ,, q'' OR U^= M Q 11 THEN 280 

200 IF te= 1 THEN LOCATE I NT(x/(2*md) )+10,INT(y/2)+1:PRINT CHRS(143):PLOT x,398-y 

. q 

210 GOTO 80 

220 PEN 1:INPUT#1,”Sprite"ia:a=a#i6#md +20000:PEN q:CLS#l 

230 c=49152: FOR b = 0 TO (2,*md ) - 1 : FOR r=0 TO 7:P0KE a+8*b+n , PEEK ( c + (n#2048i + b) : NEX 
T n.'NEXT b:GOTO 30 

240 PEN 1:INPUTMl,"Sp. ite";a:a=s*i6*md+ 20000:PEN q:CLS#l 

250 c = 491 52 : FOR b^O TO ( 2*'md ) - 1 : FOR n=0 TO 7 : POKE c +( n*2048 ) +b , PEEK ( a + 3*b + n): NEX 
T n:NEXT b:GQSUB 260:G0 T 0 80 

260 FOR b=0 TO 14 STEP 2:F0R n=0 TO 14*md STEP (mdlf-2) : tt=TEST (n, 39S-b): LOCATE IN 
T (r./<2*md) )+10, INT (b/2)+1 : PEN tt: PRINT CHR*(143):NEX 
T n:NEXT b:PEN 1 
270 RETURN 

280 PEN l:INPUTW1,"Salvar caracteres"ir*:CLS#l:r*=UPPER*<r*):IF LEFT*(r*,1)<>"S" 
THEN 200 

290 INPUT#1,"Cuantos")s:CLS#1 

300 INPUT#l,"Con que nombre"!nombre*:CLS#1:s=s*16#md:SAVE nombre*,B,200C0,s:GOTO 
200 
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10 

5 

M 

ULT ICOLOR 


20 

i 




30 

i Introduce 

los comandos resider.tes INPUT / 1 GPUT 

40 

1 




50 


LD 

BC,COMAND 

jdireccion de la tabla de comandos 

60 


LD 

HL,BYTES 

jdireccion de 4 bytes para el S.O. 

70 


JP 

#BCD1 


80 

COMAND: 

EEFW 

#A5CF 

jdireccion de la tabla de nornbres 

90 


JR 

ENTRY2 

;sal to a la rutina "MPUT" 

100 


NOP 



110 


JR 

ENTRY1 

jsalto a la rutina "GPUT" 

120 


DEFB 

#00 


130 

BYTES: 

DEFB 

#00,#00,#00,#00 

jarea para el uso del S.G. 

140 


DEFB 

"N n , ”P", "U" , #D4 

j 'MPU', ’T + #80 * 

150 


DEFB 

"G","P ", "U",#D4 

j 'GPU' , ’T + #30 1 

160 


DEFB 

#00 

imarcador FIN DE TABLA 

170 

FLAG: 

DEFB 

#00 

jindica si se esta procesando MPUT 0 

130 

J 



j GPUT 

190 

dirdat: 

DEFW 

#A67C 

jdireccion datos caracteres 

200 

J 




210 

jaqui comienza la rutina GPUT 


220 

J 




230 

ENTRY1: 

PUSH 

AF 

jpreserva no. de caracteres 

240 


XOR 

A 

Jborra acumulador 

250 


JR 

COMUN 


260 

1 




270 

jaqui comienza la rutina MFUT 


280 

! 




290 

ENTRY2: 

PUSH 

AF 

jpreserva no. de caracteres 

300 


LD 

A, #01 

jsi es MPUT, flag=l - si es GPUT, 

310 

COMUN: 

LD 

(FLAG),A 

j i lag=0 

320 


POP 

AF 

jrecupera no. de caracteres 

330 


AND 

A 

jsi no hay caracteres, retorna al BASIC 

340 


RET 

z 


350 


LD 

B, A 

jsi si los hay, inicializa contador 

340 


PUSH 

AF 

jsalva no. de caracteres 

370 

BUGLE 1: 

INC 

IX 

jy actualiza IX para que apunte 

330 


INC 

IX 

jdetras del primer caracter 

390 


DJN2 

BUCLE1 


400 


CALL 

#BC 11 

javerigua el modo de pantalla 

410 


LD 

B, A 

J resta 2-rnodo 

420 


LD 

A, #02 


430 


SUB 

B 


440 


PUSH 

AF 

jpreserva el resultado 

450 


LD 

A,(FLAG) 

jearga el flag (1: MPUT - 0: GPUT) 

460 


AND 

A 


470 


JR 

Z,GPUT2 

jsi estamos en GPUT, salta 

480 

CALL #BB78 

javerigua posicion del cursor de texto 

490 


DEC 

L 

iconvierte las coordnadas logicas 

500 


DEC 

H 

ja -fi sicas y aver igua la direccion 

510 


CALL 

#BC 1A 

icorrespondiente de la memoria 

520 


JR 

MPUT2 

j de pantalla 

530 

GPUT2 : 

CALL 

#BBC6 

javerigua coordenadas del cursor gra-fico 

540 


OR 

A 

jborra el acarreo 

550 


RR 

H 

jeonvierte coord. Y de "usuario" 

560 


RR 

L 

ja coord. Y de "base" 

570 


CALL 

#BC 11 

javerigua el modo de pantalla 

580 


POP 

AF 

jrecupera 2-modo 

590 


PUSH 

AF 

Jy lo vuelve a preservar 

600 


AND 

A 

; prueba si es 0 (modo 2) 

610 


JR 

2, PIXEL 

Jsi es modo 2, salta 

620 


LD 

B, A 

jsi no, pasa 2-modo a B 

630 

BUCLE2 : 

OR 

A 

jborra el acarreo 

640 


RR 

D 

jeonvierte coord. X de "usuario" a 

650 


RR 

E 

jcoord. X de "base" 

660 


DJNZ 

BUCLE2 


6-70 

pixel: 

CALL 

#BC 1 D 

jcalcula direcc. pixel en pantalla 

630 

MPUT2: 

POP 

AF 

Jrecupera 2-modo 

690 


PGP 

BC 

jrecupera no. de caracteres 

700 

OTRO: 

PUSH 

BC 

jsalva no. de caracteres 

710 


PUSH 

AF 

jsalva 2-modo 

720 


DEC 

IX 

japunta al caracter 

730 


DEC 

IX 


740 


LD 

C, A 

jearga en C 2-modo 

750 


LD 

B, #03 


760 


ADD 

A, B 

j 1 e s u rn a 3 
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770 


LD 

B, A 

ipasa 2-modo+3 a B 

780 


LD 

A, C 

; recupera 2-modo 

790 


PUSH 

HL 

jpreserva direccion del pixel 

800 


LB 

DE,(DIRDAT) 

;DE=#A6?C principio datos 

810 


LD 

L,(IX+O) 

ida caracter 

820 


LD 

H, SCO 


830 

BUCLE3: 

ADD 

HL , HL 

icalcuia direccion en qua se halla 

840 


DJNZ 

BUCLE3 


850 


ADD 

HL, DE 


860 


EX 

DE, HL 

ipasa direccion a DE 

870 


POP 

HL 

irecupera direccion de pixel 

880 


ADD 

A, A 

Jduplica 2-modo para calcular el ancho 

890 


JR 

NZ,ANCHO 

idel caracter.Si es modo 2, ancho =1 

900 


INC 

A 


910 

ANCHO: 

LD 

B, A 

iancho de caracter a B 

920 

COLUMN: 

PUSH 

BC 

Jpreserva ancho y 2-rnodo 

930 


PUSH 

HL 

ipreserva direccion pixel 

940 


LD 

B, #08 

iinicializa contador 

950 

BUCLE4: 

LD 

A, (#0005) 

icat'^a el modo de impresion 

960 


AND 

A 

iprueba si es cero (transparente) 

970 


JR 

Z,TRANSP 


980 


CP 

#01 

iprueba si es uno (XOR) 

990 


JR 

Z,MODXOR 

isi no, es modo normal 

1000 


CP 

#02 


1010 


LD 

A,(DE) 

icoge el byte del caracter 

1020 


JR 

NORMAL 


1030 

TRANSP: 

LD 

A, (DE) 

icarga primer byte del caracter 

1040 


AND 

A 

is; es cero, pasa a NORMS 

1050 


JR 

Z,N0RM2 


1060 


JR 

NORMAL 

iy si no, a NORMAL 

lO^O 

MODXOR: 

LD 

A,!DE) 

icarga byte del caracter 

1080 


XOR 

(HL! 

;XOR con el de la pantalia 

1090 

NORMAL: 

LD 

(HL1 , A 

;envia byte a la pantalia 

1 100 

M0RM2: 

CALL 

#BC26 

Jcalcula direccion byte inferior de 

1110 

1 



;1 a pantalia 

1120 


INC 

DE 

iapunta al siguiente byte del caracter 

1130 


DJNZ 

BUCLE4 

jrepite para los 8 bytes 

1140 


POP 

HL 

irecupera direccion esquina superior 

1150 

1 



idel caracter 

1160 


CALL 

#BC20 

icalcula direcc. siguiente columna 

1170 


POP 

BC 

irecupera ancho del caracter 

1180 


DJNZ 

COLUMN 

jrepite hasta completar el caracter 

1190 


POP 

AF 

irecupera 2-modo 

1200 


POP 

BC 

irecupera no. de caracteres 

1210 


DJNZ 

OTRO 

irepite para todos los caracteres 

1220 


RET 


ivuelve al BASIC 


1 

10 ’demo .. parte 1 


.10 ’demo ........ parte 2 

20 POKE 5,1!REM modo XOR 

20 h=HIMEM 


30 FOR n=0 TO 640 STEP 8 

30 h=h-64 


40 MOVE n ,200:!GPUT,0,1 

40 MEMORY <h-l> 


50 GOSUB 140 

50 FOR n=0 TO 15:READ alPOKE h+n,a:MEXT 


60 t GPUT,0,l: !GPUT,2,3 

60 FOR n=16 TO 31:POKE h+n,0:NEXT 


70 GOSUB 140 

70 FOR n = 32 TO 55:READ a:P0KE h+n,a:NEXT 


SC 1GPUT,2,3 

SO FOR n=56 TO 63:P0KE h+n,0:NEXT 


90 NEXT 

90 DATA 48,115,247,247,243,240,112,48 


100 FOR n=0 TO 400 STEP 2 

100 DATA 192,224,248,248,240,240,224,192 


110 MOVE 300,n:1GPUT,0 

110 DATA 0,16,48,48,48,48,16,0 


120 GOSUB 140:!GPUT,0 

120 DATA 240,240,240,240,243,247,247,243 


130 NEXT:GOTO 20 

130 DATA 0,128,192,192,200,200,128,0 


140 FOR z=0 TO 30: NExt 



150 RETURN 
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EMP EZA MOS A POTENCIAR TU AMSTRAD 


NUEVO INTERFACE RS232 

Permite comunicar los ordenadores Amstrad 

CPC 464, CPC 664 y CPC 6128, con impresoras y plotters 

con entrada serie, modems y otros ordenadores 

CARACTERISTICAS TECNICAS 

• Salida serie RS-232C estandar 

• Software contenido en Eprorn, por lo que no 
ocupa memoria del usuario. Genera comandos para 
facilitar el uso desde el basic. 



...TAMBIEN PERIFERBCOS PARA AMSTRAD 
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PRODUCTOS DISTRIBUIDOS: LSB, S.A. 
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COMPRESOR l 

CONSIGA MAS DE SU AMSTRAD COMPRIMIENDO LOS DATOS 



I problema de salvar un volcado de 
pantalla en el CPC-464 estriba en que 
requiere 16 K de memoria para salvar 
cualquier tipo de imagen, tanto texto 
como texto y graficos mezclados. Con 
un cassette el problema es la cantidad 
de tiempo que lleva cargar de nuevo la 
pantalla en memoria, aun cuando la 
velocidad de cassette es muy razona- 
ble si la comparamos con la de otros 
micros. La velocidad no es problema si 
posee un sistema de disco, pero con 
16 K cada vez, su disco no tardara en 
llenarse. 

COMPRESOR es un programa en 
cddigo maquina disenado para reducir 
la cantidad de memoria necesaria para 
albergar toda la informacion requerida 
para reproducir la imagen original. 
Esto se realiza en tres pasos: 

1. Los valores actuates del MODO, 
OFFSET DE PANTALLA, COLOR DE 
BORDE y COLORES DE TINTAS se 
copian en cinta. A ser posible es pre- 
ferible asegurarse de que el OFFSET 
DE PANTALLA es cero (ejecutando un 


comando MODE), o puede encontrar- 
se una pequena parte del display (una 
linea) diferente de cuando la salvo. 

2. Las 200 llneas horizontales se 
comparan para ver si algunas coin- 
ciden 

3. Las 80 posiciones de memoria 
para cada una de las 200 lineas se ins- 
peccionan para ver si existe alguna se- 
cuencia de numeros repetida. 

Los tres programas que se muestran 
en los listados 1,2 y 3 funcionan de la 
siguiente manera: 


Listado 1: Programa Compresor 

Este es el programa que realiza todo 
el trabajo duro de verificar y comprimir. 
La linea 10 fija la variable del sistema 
MEMORY a 5000 hexadecimal, para 
habilitar suficiente espacio para los da¬ 
tes comprimidos que se almacenan 
desde 9000 (Hex.) hacia abajo. Es po¬ 
sible que los datos no alcancen las po¬ 
siciones cercanas a 5000 H pero es 
necesaria esta previsidn por si lo hicie- 
ran. El programa en codigo maquina 
se encuentra a partir de 9030 H. Las 
posiciones de memoria entre 9000 H y 
9030 H se utilizan para almacenar la 
informacidn sobre el Modo y los colo¬ 
res de Borde y de las Tintas. El pro¬ 
grama en cddigo maquina esta dividi- 
do en nueve secciones, lo cual le fagi- 
litard el trabajo de teclearlo. Cada sec- 
cion tiene tambien un numero de veri- 
ficacion para asegurarse de que los 
DATAS son correctos. Si se introduce 
algun DATA equivocado el programa 
BASIC le dira en que seccidn estd el 
error. 

La seccidn 1 limpia los diversos but 
fers que se van a utilizar inicializando 
los con ceros. La seccidn 2 comprue- 
ba las 16000 posiciones de memoria 
para descubrir que numeros se em- 
plean en la pantalla. Esto se consigue 
inicializando a cero un bloque de 256 


bytes de memoria y usando el numero 
de la pantalla como el byte menos sig¬ 
nificative de la direccidn del bloque. Al 
final de la comprobacidn, todos los nu¬ 
meros del bloque que permanezean a 
cero son por lo tanto los no utilizados 
en la pantalla. 

La seccion 3 inspecciona este blo¬ 
que para contar cuantos numeros li- 
bres hay disponibles. El motivo de todo 
esto es que el programa COMPRE¬ 
SOR necesita dos numeros, que utili- 
za como <<marcadores», para senalizar 
las lineas que son iguales y las se- 
cuencias de numeros que son iguales. 
Obviamente si todos los 256 numeros 
de 8 bits se utilizan en la pantalla no 
hay posibilidad de utilizar ninguno 
como marcador. 

Casi la unica posibilidad de que esto 
ocurra es si usted pokea deliberada- 
mente los 256 numeros en la memoria 
de pantalla. Incluso con los dibujos 
mas complejos, existen normalmente 
algunas docenas de numeros utiliza- 
bles. Si no se puede conseguir ningun 
marcador, el programa retorna al BA¬ 
SIC, continuando si no con la sec¬ 
cion 4. 

La seccion 4 produce en primer lu- 
gar un BEEP para informarle de que 
dispone de dos marcadores. Estos se 
encuentran en las posiciones de me¬ 
moria 9001 H y 9002 H. 

A continuacion, la seccidn 5 recoge 
los valores actuates del OFFSET DE 
PANTALLA, MODO, COLOR DE BOR¬ 
DE y COLORES DE TINTAS, y los al- 
macena entre 9004 H y 902 CH. 

Las secciones 6 y 7 crean una pare- 
ja de «Bloques» que contienen los da¬ 
tos auxiliares para la inspeccion de las 
lineas de la pantalla. 

La seccion 8 compara las 200 lineas 
de pantalla para ver si algunas son 
iguales. Las lineas que sean iguales 
utilizaran s6lo dos bytes: el numero 
«marcador» seguido por el numero de 
la linea similar. 
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La seccion 9 comprobara a conti- 
nuacibn cada linea individual de 80 
bytes (a no ser que comience con el 
marcador “igual que”) y buscarb cual- 
quier repeticion de numeros. Si hay 
mas de tres numeros consecutivos 
iguales se representan como: 

Segundo ‘numero marcador”. 

Cantidad de numeros iguales. 

Valor del numero que se repite. 


A FONDO 











USTADO 1: PROGRAMA COMPRESOR 


10 MEMORY 8<5000:pQslcion=6i9030:E$=" ERROR 
EN " 


20 GOSUE 
$; " 1 " 

500:IF 

surna< > 1528 

THEN 

PRINT 

E 

30 GOSUE 
$; "2" 

500:IF 

suma< >1320 

THEN 

PRINT 

E 

40 GOSUE 
*; "3" 

500:IF 

5uma< >2488 

THEN 

PRINT 

E 

50 GOSUE 
$; " 4 " 

500:IF 

suma< >1831 

THEN 

PRINT 

E 

60 GOSUB 
$ j " 5 " 

500: IF 

sitmsK >5360 

THEN 

PRINT 

E 

70 GOSUB 
$;"6" 

500: IF 

suma< >1611 

THEN 

PRINT 

E 

80 GOSUB 

. . 17 ii 

100 GOSUE 
E$;"8" 

500:IF 

suma< >806 THEN PRINT E* 

500:IF 

suma<>10394 

THEN 

PRINT 


120 GOSUE 

500: IF 

surna< > 1 3339 

THEN 

PRINT 



E$;"9" 

199 END: , *******************#***Jf****^** 
#*#**##**#* 

500 suma=0: cod i go$= READ codigo* 

510 WHILE cod i go$< > " - 1 " : rmrnera = VAL ( " 8<"+c 
odigo$) 

520 POKE posicion,numero:posicion^posici 
on +1 

530 surria = 5unia + nunier a : READ cod i go*: WEND: R 
ETURN 

999 END; 7 *******gf4(-***#**l-)f**#******^**** 
**#*##**#** 

1000 7 i#****-##****INICIALIZA todos Ids E 
UPPERS a ZER0******K-**-X-***-)f)f*X-#X-*^ )(■* 

1010 DATA 21,0,90,3e,0,77,23,77,23,77,1, 
0,4,21,0,93,36,0,23,b,78,bi,20,4f,-1 
1020 ’----- 


2000 7 2********#*##*#*- ELISCA los NUMEROS 
LIERES *4K****************^-******-5f** 

2010 DATA 1 , 0,40,21,0, cO, 16,93,7e, 5-f , 12, 
23,b,78,bl,20,47,-1 

2020 ’--- 


3000 ’ 3#****#*##*-**#*## RETORNA si hay p 
dc os PUNTEROS ********************** 

3010 DAiA 16,O,21,44,93,6,44,7a,4a,0,20, 
1,14,2b,10,47,7a,4e,0,c8,4e,1,c8,-1 
3020 7 --- 


4000 ’ 4f4f4F-X--X--X PA8A los MARCADOE 

ES al BUFFER. . 9001/3 *************** 

4010 DATA 3a,7,cd,5a,bb,21,1,93,6,2,11,1 
,90,7a,4 e,0,20,6,7d,12, 13,5,28,3,23 
4020 DATA 13,42,-1 

4030 ’- 




Como se utilizan tres bytes, sdlo me- 
rece la pena hacerlo si hay una repe- 
ticidn de mbs de tres numeros. Por 
ejemplo, una linea completa de 80 nu¬ 
meros iguales —digamos 99— se 
comprimirfa como 12 80 99, suponien 
do que 12 representa al segundo mar- 
cador. 

Esta seccidn tambien almacena es- 
tos numeros y marcadores desde 
9000 H hacia abajo. La direccion de la 
ultima posicibn de memoria utilizada 
se almacena en 9008/9 H para perrni- 
tir el cblculo de la longitud del fichero 
comprimido. Como bien puede obser- 
var, el programa ha de realizar mucho 
trabajo, motivo por el cual se utiliza el 
codigo mbquina. 


Listado 2: Programa Descompresor 

Comparado con el programa para 
comprimir los datos de la pantalla, el 
programa para descomprimir estos da¬ 
tos es relativamente simple. El MODO, 
OFFSET DE PANTALLA y COLORES 
DE TINTAS se fijan primero. Entonces 
se inspeccionan los numeros almace- 
nados desde 9000 H hacia abajo. Si se 
encuentra un marcador se ejecuta la 
accion correspondiente con los nume¬ 
ros siguientes; en caso contrario el nu¬ 
mero es copiado en la memoria de la 
pantalla. El programa en cbdigo ma- 
quina del listado 2 se almacena a par- 
tir de 9200 H. 


Listado 3 

Este programa se ha disenado para 
utilizarlo como una subrutina para cal- 
cular la longitud del fichero comprimi¬ 
do, y para salvarlo a cinta como expli- 
caremos brevemente. 


Utilizacion de los 
programas 

Teclee el listado 1 y cuando el pro¬ 
grama funcione sin errores en los da- 
tas salvelo en cinta. Ejecute el progra¬ 
ma BASIC que pokearb el codigo mb- 
quiria en memoria. El programa BASIC 
puede ser borrado con el comando 
NEW, ya que no se le necesitarb. Es 
interesante, sin embargo, conservar 
una copia de seguridad en cinta. 





























Teclee el listado 2, s£lvelo, ejecute- 
lo y bdrrelo (NEW). Ahora ya esta listo 
para ver si funciona el programa. 

Ajuste el OFFSET a cero teclearido 
MODE 0, MODE 1 o MODE 2. A con- 
tinuacion escriba o dibuje algo en la 
pantalla, cuidando de no provocar un 
SCROLL de pantalla, ya que esto cam- 
biaria el actual valor 0 del OFFSET. 
Para salvar el dibujo de la pantalla 
como fichero comprimido teclee 
CALL &9030: si todo va bien escucha- 
ra un BEEP y aparecera el mensaje 
READY pasados de uno a diez segun- 
dos, dependiendo de la complejidad de 
la pantalla. 


5000 ’5**************** COPIA MODQ, OFFS 
ET Y COLORES *********************** 

5010 DATA cd,b,bc,22,5,90,21,0,0,cd,5,bc 
, cd ,li,bc,32,4,9Q,21,a,90,e5,cd 
5020 DATA 3b,be,e1,70,23,71,23,3e,10,+5, 
e5,cd,35,be,el,+1,70,23,71,23,3d 
5030 DATA +e,0,20,+0,-1 

5040 ’----- 


6000 ’6**************** CREA BLOQUE 400 
de MEMORIA DE PANTALLA ************* 

6010 DATA 6,c3,11,0,94,21,0,cO,7d,12,13, 
7c,12,13,cd,26,be,10,+5,-1 
6020 ’-*- 


Para verificar el correcto tunciona- 
miento del programa decodificador (lis¬ 
tado 2) cambie primero el MODO y el 
BORDE y las TINTAS si lo desea, o 
simplemente borre la pantalla, y escri¬ 
ba CALL &9200. 

Si todo va bien, su dibujo original 
aparecera en un segundo. Si el progra¬ 
ma no funciona correctamente verifi- 
que todos los datas en los listados 
para comprobar que los ha introducido 
correctamente. Las sumas de verifica- 
cidn no son infalibles; despues de 
todo, pudo introducir dos valores inter- 
cambiados. La suma sera la misma, 
pero los dos valores intercambiados en 
el programa en codigo mdquina produ- 
ciran el desastre. Cuando los dos pro- 
gramas funcionen, introduzca el lista¬ 
do 3 y salve el fichero comprimido a 
cinta (o disco). Si solamente esta 
creando y salvando dibujos a cinta en- 
tonces no es necesario que el progra¬ 
ma del listado 2 este en memoria. Ana- 
logamente, si esta cargando los fiche- 
ros en memoria para devolverlos a la 
pantalla, no es necesario que el pro¬ 
grama del listado 1 estd en memoria. 
Ambos pueden funcionar perfectamen- 
te tanto juntos como separados, segun 
sea necesario. 

Supongamos que usted tiene un 
programa en BASIC para crear hermo- 
sos dibujos que desea salvar en forma 
comprimida. Esto es lo que neccesita- 
ra hacer: 

En primer lugar, cargue el listado 1 
y ejecutelo para cargar el programa en 
codigo maquina en memoria. Cargue 
su programa BASIC para crear los di¬ 
bujos y a continuacion mezcle (MER¬ 
GE) la subrutina del listado 3 con su 



7000 ’7**************** CREA BLOQUE 200 
************************************ 
7010 DATA 21,0,93,6,c3,75,23,10,+oq-l 
7020 »----- 


3000 ’8*************** CGMPARA LAS LINEA 
3 ********************************** 

3010 DATA 21,0,93,e5,21,1,93,dd,21,0,94, 
+ d,21,2,94,dd,46,l,dd,4e,0,+d,56,1 
8020 DATA +d,5e,0,7d,be,20,11,©5,c5,e1,6 
,50,la,be,20,9,13,23,10,+3,el,cl,71 
3030 DATA c5,e5,e1,7d,+e,c7,20,16,el,7d, 
+e,c6,28,17,dd,23,dd,23,23,7d,be,20 
8040 DATA +2,e5,dd,e5,+d,el,13,c2,+d,23, 
+d,23,23,18,bb,-1 

8050 ’----- 


9000 ’9*************** COMPRIME LAS LINE 
AS ********************************* 

9010 DATA 11,0,90,3e,1,12,lb,i,0,c8,dd,2 
l,0,94,+d,21,0,93,d5,dd,66,l,dd,6e,0 
9020 DATA +d,7e,0,b9,20,62,c5,1,50,0,11, 
0,96,ed,b0,3a,l,90,32,50,96,cl,dl,c5 
9030 DATA 21,0,96,3e,0,32,7,90,6,1,7e,23 

,4+,3a,1,90,be,28,32,79,be,20,3,4 
9040 DATA 18,+1,4+,78,+e,3,28,15,+e,2,28 
,11,+e,l,28,d,3a,2,90,12,lb,78,12,lb 
9050 DATA 79,12,lb,18,5,79,12,lb,10,+c,3 
a,7,90,+e,63,28,c,18,c5,18,9c,3e,63 
9060 DATA 32,7,90,79,18,cd,c1,18,b,d1,3a 
,1,90,12,ib,+d,7e,0,12,lb,dd,23,dd,23 
9070 DATA + d , 23, c , 10, d +■, ed , 53,8,90, c9, - 1 

LISTADO 2: PROGRAMA DESCOMPRESOR 

10 MEMORY £<5000: posic ion=8c9200 
1000 surna=0 : cod i go96= READ codigo$ 

1010 WHILE cod igo$< > "-1" : numero=VAL ( "£<" + 
codigo$) 

1020 POKE pos i c i on , tiurnero: pos i c i on=posi c 
i o n + 1 

1030 surna-suma + numero : READ cod igo$: WEND 

















— 


LISTADO 2: PROGRAMA DESCOMPRESOR 


1040 IF suma<>15731 THEN PRINT "Error en 
1 os DATAS |":END 

13000 ’ ****************** DESCOMPRIME LO 
S DATAS (Call 8*9200) ****************** 
13010 DATA 3a,4,90,cd,e,be,21,0,0,cd,5,b 
c >2I,a,90,46,23,4e,23,e5,cd,38,bc,el 
1j>020 DATA 3e , 10,-f 5,46,23,4e, 23, e5, cd , 32 
, be, el, -f 1,3d, +©,0,20, i 0,21 , f-f ,3f ,dd, 21 
13030 DATA 0,90, 1 1,0,cO,e,c8,d5,6,50,7e, 
dd,be,l,28,34,dd,be,2,20,18,2b,c5,4e,2b 
13040 DATA ?e, 12, 13,5,d,79,+e,0,20,f6,78 
, cl, 47,2b ,-fe, 0,20, dt, 13,5,12, 13,2b, 10 
13050 DATA dS,d1,d,79, i e,0,28,25,e5,62,6 
b, cd,26,be,54,5d,el,13,c3,c5,2b,46,4,e5 
13060 DATA 21,0,cO,cd,26,be, 1 0,Tb,cd,29, 
be,l,50,0,ed,b0,el,2b,cl,18,d4,2a, 5 90 
13070 DATA cd,5,be,c9,-1 

13080 ’- 


—LISTADO 3— 

10000 ’*** CALCULA DIRECCION DE COMIENZO 
Y LONGITUD DE UN FICHERO COMPRIMIDO *** 
10010 1 sb=PEEK (£<9008) : msb=F'EEK (8*9009) Ire 
su1tado=msb*256+1sb 

10020 total-36912-resultado:PRINT”Memori 
a utilizada 'total 

10030 PRINT"Pulse <ENTER> para SALVAR a 
ClNTA" 

PRINT"Cualquier otra tecla para FI 


10040 

N" 

10050 

10060 

10070 


WHILE tec 1a$="":tec 1a$=INKEY$:WEND 
IF tecls$<>CHR$(13) THEN END 
LINE INPUT"Introduzca el nombre de 
1 -fichero "Inombrei 

10080 SAVE"!"+nombre$,B,resu1tado,total 
10090 ■ 


programs en BASIC. Inserte la siguien- 
te linea en esta subrutina: 

10005 CALL &9030 
Cuando haya creado su dibujo en- 
tonces GOSUB 10000, introduzca el 
nombre que desee darle al dibujo y el 
fichero se salvara a cinta como fichero 
binario. Repita este proceso si necesi- 
ta salvar mas dibujos. 

Para recuperar los dibujos cargue el 
programs del listado 2 y ejecutelo. Si 
ha salvado cinco dibujos en cinta en- 
tonces estos pueden ser recuperados 
y mostrados uno tras otro utilizando un 
programs como este: 

10 FOR PANTALLA=1 TO 5 
20 LOAD “!" 

30 CALL &9200 
40 NEXT PANTALLA 
Cada dibujo sera cargado y mostra- 
do en el monitor. Ahora bien, quanta 
memoria se ahorra? 

Como media, el ahorro es de un 
50 %, lo cual, en terminos de ordena- 
dor es una economia considerable. Di¬ 
bujos muy simples pueden utilizar sdlo 
1 K de memoria mientras que dibujos 
complejos pueden necesitar 12 K o 
m<!>s. Muchos de mis dibujos utilizan 
aproximadamente 8 K asi que podra 
albergar el doble de dibujos en su cin¬ 
ta o disco, y necesitara la mitad del 
tiempo habitual para cargarlos. 

En algunos casos su programs para 
crear dibujos sera mucho mas peque- 
ho que el fichero comprimido. Sin em¬ 
bargo, si la rutina de dibujo es del tipo 
complejo de tres dimensiones, utilizan¬ 
do muchas fdrmulas matematicas, el 
tiempo necesario para realizar el dibu¬ 
jo puede ser considerable (a veces flo¬ 
ras) a pesar de que el CPC-464 no es 
perezoso. Este es el tipo de situacio- 
nes en que la tecnica de compresion 
alcanza su maxima utilidad. 

Angel ZARAZAGA 
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MACADAM FLIPPER 


WIZARD'S LAIR 


IOCKRMD 


ARGO NAVIS 


imSBaei 


■MR 


ODQJOB 


DRAUGHTSMAN 


OTROS PROGRAMAS EN STOCK 


envienos a MICROBYTE 

P° Castellana, 179,1 ° - 28046 Madrid 


Nornbre 


Dceccion 


Poblacion 


Telelono 


ENVIOS GRATIS 


PRECIO TOTAL PESETAS 


Incluyo talon nonxnativo 
Contra-Reembolso 


Pedidos por telefono 91 - 442 54 33 / 44 


i MOS PROGRAM 


■a 

la "T 


MINI OFFICE P.VP. CASS 1 :00 ph 

R.V.P. OIS. 3.900 pts. 

WORLD CUP FOOTBALL P.V.P. CASS. 1.800 pis 
BATLE FOR MIDWAY P.V.P. CASS. 1.800 pts. 
FIGHTER PILOT P.V.P. CASS. 2.200 pts. 
SURVIVOR P.V.P. CASS. 1.800 pts. 

MOON BUGGY P V.P. CASS. 1.800 pts 
TECHNICIAN TED P.V.P CASS 1.800 pts 
FRUITY FRANK P,V.P. CASS. 1.600 pis 

DATABASE P.V.P CASS. 2.100 pis. 

LOGO TURTLE GRAPHICS P.V.P. CASS. 2.400 pts 
ASCOPY Y TASPRINT P.V.P. CASS. 2.600 pts. 
FONT EDITOR P.V.P. CASS. 1.900 pis. 


COMPUTER 


GRAPHICS 


listicauo prog[3*na de dibujo aue psrmile (rotor la pantalla dal AMS 
rad como un sort o tablero de dibu|o, sus resutlados son cxpefacula 

S. P.V.P.: CASSETTE 4 300 pit DISCO 5.200 pis. 
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280 

CP 

400 

290 

JR 

N2, tint a: 

300 

LD 

HL, 43FFF 

310 

LD 

IX,49000 

320 

LD 

DE,4COOO 

330 

LD 

C, 4CS 

340 contin 

: PUSH DE 

350 

LD 

B, 450 

3.10 mark?; 

LD 

A,(HL) 

370 

CP 

(IX+1) 

380 

JR 

Z,markl 

390 

CP 

< IX+2) 

400 

410 

JR 

NZ,imp 

420 ; 

430 


rut i nz 

440 mark2: 

DEC 

HL 

450 

PUSH 

BC 

460 

LD 

C,(HL) 

470 

DEC 

HL 

480 rep ]te; 

LD 

A,(HL) 

490 

LD 

(DE),A 

500 

INC 

DE 

510 

DEC 

E 

520 

DEC 

C 

530 

LD 

A , C 

540 

CP 

400 

550 

JR 

NZ , rep i t; 

560 

LD 

A, B 

570 

POP 

BC 

380 

LD 

B, A 

5°0 

DEC 

HL 

600 

CP 

400 

610 

JR 

NZ,mark? 

620 

630 

JR 

otra 

640 ; 

650 


r u t i r. a d 

660 imp: 

LD 

(DE),A 

670 

INC 

DE 

680 

DEC 

HL 

690 

DJNZ 

mark? 

700 otra: 

POP 

DE 

710 

DEC 

C 

720 

LD 

A, C 

730 

CP 

400 

740 

JR 

2, f i n 

750 

PUSH 

HL 

760 

LD 

H, D 

770 

LD 

L,£ 

780 

CALL 

4BC26 

790 

LD 

D, H 

800 

LD 

E, L 

310 

POP 

HL 

320 

830 

JR 

contin 

840 i 

350 


rut i 

860 markl: 

PUSH 

BC 

370 

DEC 

HL 

880 

LD 

B,(HL) 

890 

INC 

E 

900 

PUSH 

HL 

910 

LD 

HL.4C000 

920 bucle: 

CALL 

4BC26 

930 

DJNZ 

buc 1 e 

940 

CALL 

4BC29 

950 

LD 

EC,40050 

960 

LD IR 


970 

POP 

HL 

980 

DEC 

HL 

990 

PGP 

BC 

1000 

1010 

JR 

otra 

1020 ; 


sal: 


isiguiente pluma hasta 16 
iprincipio del -fiehero camprimido 
! d i recc ion de los marcadares 
Iccmienzc de la memoria de pantalla 
icarga no. de lineas en la pantalla 
ipreserva direccian de pantalla 
icarga no. de bytes por linea 
i cage dato del fichero 
isi es el primer marcador salta a la 
irutina correspondiente 
■ 51 no es el segundo rnarcador salta 
ia la rutina de irnpresion en pantalla 


rutina SEGUNDO MARCADOR 


isalva contadores de bytes y lineas 
jcarga numero de bytes repetidos 

icarga valor del byte a repetir 
! carga byte en ppr.talla 
isiguiente posician de pantalla 
jdecrem. cantador no. de bytes/Iinea 
;decreroenta contador de bytes 
jrepite el numero de veces necesario 


i -f i nal de linea? 

irecupera contador de lineas (C) 


;si no, siguiente dato del -fichero 
isi es el final de linea, calcula 
ila d 1 reccion de la siguiente 


IMPRESIQM DIRECTA 


{imprime el byte en pantalla 
isiguiente direction de pantalla 
isiguiente dato del fichero 
icomprueba si es un marcador 
irecupera direcelon linea de pantalla 
;actualiza contador lineas 
isi no quedan lineas, fin del programa 


ipreserva puntero datos del fichero 


icalcula direccion siguiente linea 


irecupera puntero datos fichero 
icontinua 


rutina PRIMER MARCADOR 


isalva contadores de bytes y lineas 

icarga no. de la linea igual 

ipreserva puntero datos fichero 
ibusca linea a copiar 
}SCR NEXT LINE 

iSCR PREV LINE 

icop 1 a la linea de (HL) a (DE) 

irecupera puntero fichero 
isiguiente dato del fichero 
irecupera contadores bytes y lineas 


1C30 

1040 fin; 
1050 
1060 


SAL IDA DEL PROGRAMA 


LD HL, (49C05) 
CALL 4BC05 
RET 


icarga OFFSET de pantalla 
ifija OFFSET de pantalla 
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OFERTA ESPECIAL 
.,j PROGRAMAS 


DEOBSEQUIO 

□ CONSIDEREME SUSCRIPTOR DE LA REVISTA 
AMSTRAD USER por un ano (12 mimeros) 

Recibire en mi domicilio, como obsequio especial, dos programas en cassette 


NOMBRE 


1° APELLIDO 

2.° APELLIDO 

AD-MF048 

P.V.P. 19.500 

LLLUT IT r L,_L 

3 

LI 1 1 II 11 l LI 1 1 1 1 1 II II 1 

impresora aleatoria. (Opcional- 

CALLE, AVDA., PLAZA 





nrrn 11 ttt 

urn jt nmj mxm 


AD-CG062 

P.V.P. 19.500 

LOCALIDAD 


CODIGO POSTAL 

PROVINCIA 



11 n i tttttt 

n 

rrm i 

1 = 

AD-CG063 

P.V.P. 24.500 

FORMA DE PAGO: 

□ 

CONTRA REEMBOLSO 

PRECIO SUSCRIPCION 




□ 

POR GIRO POSTAL 

3.100 PTAS.* 

AD-AF069 

P.V.P. 19.500 


□ 

POR TALON DE BANCO (1) 

* Precio normal en quioscos: 

os con totalizaci6n de compras. 


□ 

CON TARJETA DE CREDITO 

3.600 ptas. anuales 

y albaranes. (Dos unidades de 


Carguen 3.100 ptas. a mi tarjeta: AMERICAN EXPRESS □ VISA □ 

Num. de mi tarjeta Q n □ I I I 1 1 I I f I I I 1 I I I 1 1 1 1 ITT 1 1 1 mi □ 


Fecha de caducidad 


Firma 

(1) Dirigir a INDESCOMP, S. A. 

ALMACEN-FACTURACION AD-AF025 P.V.P. 15.500 

Control de entradas y salidas de inventarios con totallzacidn de compras y 
ventas, Las facturas descuentan la mercancia del almacin automiticamente. 
Emite recibos, facturas y albaranes. 

(Una unidad de disco). 

RPA CLIENTES-PROVEEDORES- 

FAC TURACION-MAII ING _ AD -CP071 P.V.P. 15.500 

Le permite tener a sus clientes y proveedores clasificados por sectores, sus 
totales facturados y su IVA.Totalizaci6n parcial y total. Permite bacer mailing y 
el control y seguimiento de la cartera de sus clientes. 

PRA PROCETEXT AD-P T061 P.V.P. 9.500 

Procesador de textos y mailing. Incluye mirgenes, impresion, tabuladores, 
acentos. etc. 

RPA AG EN DA RO BOT AD-AR032 P.V.P. 12.500 

Integrado por cuatro subprogramas: Agenda-Fichero de clientes, Oietario, 
Calculadora y Base de Dates. 

CONTABIUDAD GENERA! M AD-CG02 7 P.V.P. 15.500 

Contabilidad general esparlola. segun el plan contable. Incluye: Anotacidn 
de asientos, Modificacidn de apuntes. Asientos externos. Libro dlario, Mayor, 
Balance, Fin de periodo, Fin de eiercicio. Con cilculos matemiticos realizados 
en ensamblador que garantizan alta precision. 

“AMSTRAD 6128” 

Serie Profesional 2000. CPM/P a us 


RPA MU LTI AGENDA ROBOT AP-MR072 P.V.P. 15.500 

Realizada en Pascal. 

RPA MULTIBASE_3 AD-MB046 P . V.P. 19.500 

Permite tracer graficos de curva, tarta e histogramas, lineal y en tres di- 
mensiones. 

RPA FACTURACION 6128 AP-FA047 P.V.P. 19.500 

Incluye apuntes de contabilidad, formas de pago y diversas opciones de 
impresora: Factura, Albaran o Recibo. Con totaiizaciOn parcial o general In¬ 
cluye IVA. (Opcionalmente dos unidades de disco}. 

RPA NOMINA S AD-NOQ45 P.V.P. 19.500 

Comprende impresos TCI, TC2, apuntes de contabilidad e informes. 

RPA GESTION DE EMPRESA AD-GE030 P.V.P. 65.000 

IntegraciOn de los programas: Contabilidad General, NOminas. Facturacion 
Clientes y Proveedores. (Dos unidades de disco). 


6128” 

PM/P!us 


RPA GEOGRAFIA DE ESPANA 

AD-GS051 

P.V.P. 9.500 

RPA GEOGRAFIA UNIVERSAL 

AD-GU073 

P.V.P. 9.500 

RPA CLIMATOLOGIA 

AD-CL073 

P.V.P. 9.500 

RPA DEMOGRAFIA 

AD-DEQ75 

P.V.P. 9.500 

RPA CUERPO HUMANO 

AD-CH052 

P.V.P. 9.500 

RPA PLANETARIO 

AD-PL076 

P.V.P. 9.500 

RPA TEOREMAS GEOMETRICOS 

AD-TG077 

P.V.P. 9.500 

“AMSTRAD 6128” 



Sectores Profesionales. CPM/Plus 


ARTICULO 


REF. 

P.V.P. 

RPA MEDICO-CLINICO-FARMACOS 


AD-CF028 

15.500 

RPA MEDICO-CL1NICO-DENTISTA 


AD-CE049 

15.500 

RPA CALCULO DE ESTRUCTURAS 


AD-CE078 

12.500 

RPA VIDEO CLUB 


AD-VC029 

28.500 

“AMSTRAD 

8256” 


CPM/Pius 



RPA ALMACEN-FACTURACION 


AD-AF056 

24.500 

RPA CONTABILIDAD GENERAL 5 


AD-GE055 

24.500 

RPA GESTION DE EMPRESA 


AD-GE057 

76.500 

RPA MULTI AGENDA ROBOT 


AD-MR085 

19.500 

RPA NOMINAS 


AD-NO059 

28.500 

RPA MULTIBASE 3 


AD-MB060 

28.500 

RPA FACTURACION 8256 


AD-FA053 

28.500 

RPA MASTER FILE 


AD-MF054 

28.500 

RPA VIDEO CLUB 


AD-VC066 

35.500 

RPA GRAFICOS DE GESTION 


AD-FG067 

19.500 

BASE DE DATOS 


AD-ED080 

24 500 

RPA ELEPHANT DATA BASF' 1 




RPA ADMINISTRACION DE FINCAS 


AD-AD081 

35.500 

RPA PROJECT PLANNING 


AD-PP082 

19.500 

RPA BRAINSTORM PLUS 


AD-BS083 

19.500 

RPA CLIENTES-PROVEEDORES-FACT. 


AD-CP084 

24.500 


MAILING 

Los programas para el Amstrad 8256 estaran dispombles en la ultima sema- 
na de enero. Sus caracteristicas serin similares a los del Amstrd 6128 con 
mayor capacidad de datos y detiniciOn de pantaMa Todos ellos funcionaran 
con un sistema de pTotecciOn (un Interfaz) denommado '’Interproc 1 '. 
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290 

300 

310 

320 

330 

340 con’ 
350 

3.40 marl<_ 
370 
330 
390 
400 
410 
470 i 
430 

440 fliil'l 
450 
460 
470 

4S0 repi 

490 

500 

510 

520 

530 

540 

550 

560 

570 

5S0 


RESPUESTA COMERCIAL 
Autorizacion N 5 7000 
B O.C. N? 10 de 30-8-85 


NO 

NECESITA 

SELLO 

A Srunqueor 
en desl.no 


hdesnnmp s a 

Departamento de Publicaciones 

Apartado de Correos 267 F.D. 

MADRID 


600 

1).U 

JR 

Me, mar^ 

620 

JR 

cti-a 

630 



640 ; 


I'uti n a d 

650 



660 imp: 

LD 

(DE),A 

670 

INC 

DE 

630 

DEC 

KL 

690 

CJNZ 

r.-i ark? 

700 otra: 

POP 

DE 

71C 

DEC 

C 

720 

LD 

A, C 

730 

CP 

HOC 

740 

JR 

Z, f i n 

750 

PUSH 

HL 

760 

LD 

H, D 

770 

LD 

L,E 

780 

CALL 

8BC26 

790 

LD 

D, H 

800 

LD 

E, L 

810 

POP 

HL 

320 

JR 

c c n t i n 

830 



840 ; 


r u t i i 

850 



360 marki: 

PUSH 

EC 

370 

DEC 

HL 

880 

LD 

B,(HL) 

890 

INC 

E 

900 

PUSH 

HL 

910 

LD 

HL.HC000 

920 bucie: 

CALL 

H3C26 

930 

DJNZ 

buc 1 e 

940 

CALL 

HBC29 

950 

LD 

BC,40050 

960 

LDIR 


970 

POP 

KL 

930 

DEC 

HL 

990 

POP 

BC 

I0C0 

JR 

otra 

1010 



1020 ; 


SAL I 

I C30 



1040 fin: 

LD 

HL,(H9005) 

1050 

CALL 

SECC5 

I 060 

RET 



is. e s el -final de 1 i n e a, calcula 
; 1 a. direccion de la siguier.te 


IMPRG31 ON DIRECTA 


Jimp rime el byte en pantaila 
isiguiente direccion de pantaila 
isiguiente data del tic hero 
icor.iprueba si es un marcador 
irecupera direccion linea de pantaila 
;actualiza contadar 1 1 neas 
!si no quedan lineas, fin del programs 


ipreserva puntero dates del ficliero 


Icalcula direccion siguiente linea 


irecupera puntero dates ficliero 
I c o n t i n u a 


rutir.a PRIMER MARCADOR 


isalva coritadores de bytes y lineas 

Jcarga no. de la linea igual 

i preserve puntero datos ficliero 
ibusca linea a copiar 
J SCR NEXT LINE 

I SCR PREV LIME 

icopia la linea de (HL) a (DE) 

irecupera puntero ficliero 
isiguiente dato del fichera 
irecupera cor. tadores bytes y lineas 


SAL I DA DEL PROGRAMA 


icarga OFFSET de pantaila 
ifija OFFSET de pantaila 
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Software K Hardware 


“AMSTRAD 664” 

Serie II. CPM 2.2 


RPA BASE DE DATO S AD-BD087 P.V.P. 9 .500 

Programa muy versatil, potente y de sencillo manejo. Con opciones de 
color, modificaciones, busqueda, inserciones, etc. Dispone de una completi- 
sima salida por impresora. 

RPA MASTER BAS E AD-MA079 P.V.P. 12.500 

Base de Datos realizada en PASCAL, arboles, busqueda aleatoria. 

RPA MULTICALC/CPM/PLUS AD-HC024 P . V.P. 12.500 

Hoja de caiculo realizada en Pascal, le permite hacer calculos matematicos, 
asi como graficos. Es ideal para cilculos econdmicos y financieros. 

RPA FACTURACIO N 664 AD- F A070 P.V.P. 12,500 

Permite realizar facturas, almacenarlas y despues modificarlas. Tratamiento 
de IVA. Totalizaciones generates y parciales. Genera recibos. albaranes y fac¬ 
turas. Salida por impresora muy completa. 

ALMACEN-FACTURACION AD-AF025 P.V.P. 15.500 

Control de entradas y salidas de inventarios con totalizacibn de compras y 
ventas. Las facturas descuentan la mercancia del almacbn automaticamente. 
Emite recibos, facturas y albaranes. 

(Una umdad de disco). 

RPA CLIENTES-PROVEEDORES- 

F ACT UR ACI ON-MAILING _ AD-CP071 P.V.P. 15.500 

Le permite tener a sus clientes y proveedores clasificados por sectores, sus 
totales facturados y su IVA. Totalizacidn parcial y total. Permite hacer mailing y 
el control y seguimiento de la cartera de sus clientes. 

PRA PR OCE TEXT AD-PT0 61 P.V.P. 9.500 

Procesador de textos y mailing. Incluye margenes, impresidn. tabuladores, 
acentos. etc. 

RPA AGEN DA ROBOT AD-AR032 P.V.P. 12.500 

Integrado por cuatro subprogramas; Agenda-Fichero de clientes, Dietario, 
Calculadora y Base de Datos. 

CONTABI LIPAP GENERAL II AD-CG027 P . V.P. 15.500 

Contabil’dad general espaflola, segun el plan contable. Incluye: Anotacidn 
de asientos, Modificacibn de apuntes, Asientos externos, Libro diario, Mayor, 
Balance, Fin de periodo, Fin de ejercicio. Con cdlculos matemdticos realizados 
en ensamblador que garantizan alta precision. 


RPA MASTER FILE 

AD-MF048 

P.V.P. 19.500 

Fichero maestro aleatoria con opcidn de 
mente con dos unidades de disco). 

RPA CONTABILIDAD GENERAL III 

impresora aleatoria. (Opcional- 

AD-CG062 P.V.P. 19.500 

Incluye masas patrimomales. 



RPA CONTABILIDAD GENERAL IV 

AD-CG063 

P.V.P. 24.500 

Incluye analftica y previsidn de cobros. 



RPA ALMACEN-FACTURACION 

AD-AF069 

P.V.P. 19.500 


Control de entradas y salidas de inventarios con totalization de compras, 
ventas y existencias. Emite recibos, facturas y albaranes. (Dos unidades de 
disco). 


RPA CLIENTES-PROVEEDORES- 


-FACT UR AC ION-MAI LING 

AD-CP088 

P.V.P. 15.500 

“AMSTRAD 6128” 


Educativos. 

CPM/Plus 


RPA GEOGRAFIA DE ESPAftA 

RPA GEOGRAFIA UNIVERSAL 

RPA CLIMATOLOGIA 

RPA DEMOGRAFIA 

RPA CUERPO HUMANO 

RPA PLANETARIO 

RPA TEOREMAS GEOMETRICOS 

AD-GS051 

AD-GU073 

AD-CL073 

AD-DE075 

AD-CH052 

AD-PL076 

AD-TG077 

P.V.P. 9.500 
P.V.P, 9.500 
P.V.P. 9.500 
P.V.P. 9.500 
P.V.P. 9.500 
P.V.P. 9.500 
P.V.P. 9.500 

“AMSTRAD 6128” 


Sectores Profesionales. CPM/Plus 

ARTICULO 

REF. 

P.V.P. 

RPA MEDICO-CLINICO-FARMACOS 
RPA M ED ICO-CLINI CO-DENTIST A 

RPA CALCULO DE ESTRUCTURAS 

AD-CF028 

AD-CE049 

AD-CE078 

15.500 

15.500 

12.500 


RPA VIDEO CLUB AD-VC029 28.500 

“AMSTRAD 8256” 

CPM/Plus 


“AMSTRAD 6128” 

Serie Profesional 2000. CPM/Plus 


RPA MULTI AGENDA ROBOT AD-MR072 P.V.P. 15.500 

Realizada en Pascal. 

RPA MULTIBASE 3 AD-MB046 P.V.P. 19.500 

Permite hacer graficos de curva, tarta e histogramas, lineal y en tres di~ 
mensiones. 

RPA FACTURACION 6128 AD-FA047 P.V.P. 19.500 

Incluye apuntes de contabilidad formas de pago y diversas opciones de 
impresora: Factura, Albaran o Recibo. Con totalizacion parcial o general. In¬ 
cluye IVA. (Opcionaimente dos umdades de disco). 

RPA NOMINAS AD-NOQ45 P.V.P. 19.500 

Comprende impresos TCI, TC2, apuntes de contabilidad e informes. 

RPA GESTION DE EMPRESA AD-GE030 P.V.P. 65.000 

Integracibn de los programas: Contabilidad General, Nominas, Facturacidn. 
Clientes y Proveedores. {Dos unidades de disco). 


RPA ALMACEN-FACTURACION 

AD-AF056 

24.500 

RPA CONTABILIDAD GENERAL 5 

AD-GE055 

24.500 

RPA GESTION DE EMPRESA 

AD-GE057 

76.500 

RPA MULTI AGENDA ROBOT 

AD-MR085 

19.500 

RPA NOMINAS 

AD-NO059 

28.500 

RPA MULTIBASE 3 

AD-MB060 

28,500 

RPA FACTURACION 8256 

AD-FA053 

28.500 

RPA MASTER FILE 

AD-MF054 

28.500 

RPA VIDEO CLUB 

AD-VC066 

35.500 

RPA GRAFICOS DE GESTION 

AD-FG067 

19.500 

BASE DE DATOS 

"RPA ELEPHANT DATA BASE' 

AD-ED080 

24 500 

RPA ADMINISTRACION DE FINCAS 

AD-AD081 

35,500 

RPA PROJECT PLANNING 

AD-PP082 

19.500 

RPA BRAINSTORM PLUS 

AD-BS083 

19.500 

RPA CLIENTES-PROVEEDORES-FACT. 
MAILING 

AD-CP084 

24.500 


Los programas para el Amstrad 8256 estar£n disponibles en la ultima sema- 
na de enero. Sus caracteristicas seran similares a los del Amstrd 6128, con 
mayor capacidad de datos y definicidn de pantalla. Todos ellos funcionar£n 
con un sistema de pToteccidn (un Interfaz) denominado “Interproc". 
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Los mejores programas del mes seleccionados por 



PARTflCIPE 
GANE 


con nuestra 


revista uno de estos fabulosos premios 

* 1 Impresora AMSTRAD DM-1 

* 5 Lotes de 3 programas 
en cassette 


• Para participar solamente debera rellenar el cupon 
adjunto con Sos tftulos de sus cinco programas 
favoritos en orden de preferencia y enviarlo a 
AMSTRAD USER. 

• Todos los cupones recibidos antes del dfa 30 de 
cada mes entraran en un sorteo. 

• A los premiados les ser6 notificado por carta certi- 
ficada en su domicilio. 


AMSTRADIEZ MES: FEBRERO 1986 

Programas: 

1— . 

2 — . 

3 — . 

4 — .. 

5 — . 

Nombre..... 

Direccidn..... 

Localidad. D.P. 

Provincia. 

Profesidn..... 



PREMIOS SORTEO 
AMSTRADIEZ 
DICIEMBRE 85 

IMPRESORA AMSTRAD 
DMP-1 

Oscar Gracia Gonzalez 
Avda. de Daroca, 29-2.° 

28017 MADRID 

LOTES DE 3 PROGRAMAS 
EN CASSETTE 

Enrique Monrabal Company 
C/ Alvarez Sotomayor, 27-6 
46017 VALENCIA 

Jose Luis Cano Cervera 
C/ Gonzalez Adalid, 7-6.° B 
30001 MURCIA 

Yolanda Pellejero Cezon 
C/ Andres Gurpide, 3, 7.° esc. 2 
50008 ZARAGOZA 

Francisco Javier Lopez Serna 
C/ Doctor Zamenhof, 2-4, 6.° 2.* 
08020 BARCELONA 

Carlos Alfonso Rhodes de Diego 
Pza .de la Iglesia ,9 
Cabanillas del Campo 
(GUADALAJARA) 


Fotocopie o 

recorte y envi'e este cup6n a 

AMSTRADIEZ 

Avda. del Mediterrdneo, 9 
28007 Madrid 
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VARIABLES DE NUESTRO 
PROGRAMA 


65350 INPUT "Nomb+e de Sa Variable 
45360 IP zz*="" THEN END 

45370 IF RIGHT* in*, 1) = '*" OR RIGHT*(zz* 
,£)="!" OR RIGHT*(zz*,1>=”V THEN zz*=LE 
FT* LEMfzzSi -1 ) : GOTO 4 53*0 


65320 2 .-S=lJPPER* (z:*i : zzIS=LOWER*(ZZ*> !Z 
zS=LEFT*(;r*.LEN!zz*)-l)+CHR*(128 OR ASC 
(RIGHT*(zz*,1)n:zzI*=LEFT*(zzl*,LEN(zzl 
*)-1;+CHR*(128 OR ASC(RIGHT*(zz1*,1))) 
45390 zzinicio.'=C: zzf in !=65335: INPUT "Li 
nea de comienzo : " jzzinicio!:INPUT "Lin 
ea de Finilizari "|zzfin!:IF zzfin!=0 TH 
EM zzfin'=65535 
65400 zz!=L170 

65410 zzl!=FEEK(zz!)+256#PEEK(zz!+1) : IF 
zzl!=0 THEN PRINT "Encontrada el fin del 
progr sma. ": END 

63420 zz2I=PEEK(zz!+21+256*PEEK(zz!+3) 
65430 IF zz2!<zzinicio! THEN zz!*zz!+zzl 
1 :GOTO 65410 

65440 IF zz2!>zzfin! THEN END 

65450 zzO!=0!zz3!=zz!+4 

65460 IF zz3!>=zz!+zzl! THEN 65490 

65470 IP CHR*(PEEK(zz3!)!=LEFT*(zzl*,1) 

OR CNR*!PEEK < z z3!))=LEFT*(zz*,l) THEN GO 

SUB 65510 

654SO zz3‘=zz3)+l:GOTO 65460 
65490 IF zzOlOO THEN PRINT "En la linea 
‘;r:2 1 ;" - n !zzO!1 " veces* 

65500 zz!=zz!+zzl!I GOTO 65410 
65510 zz5!=zz3 1 !FOR zz4!=l TO LEN(zzl*) 
65520 IF NOT (MID*(zz1 *,zz4!,1)=CHR*(PEE 
K (zz5!)) OR MID*(z z*,zz4(,11»CHR*(PEEK (2 
z5 I ) 1 ) THEN RETURN 

65530 zz5!-zr5!+1: NEXT zz4 >.: zzO !-zzO > +1: 
zz3!=zz3!+LEN(zzl*):RETURN " 


CURVAS EN IRES 
DIMENSIONES 


Este programa de 14 lineas produce algunas de las me- 
jores figuras en tres dimensiones. 

El unico inconveniente es que emplea varios minutos en 
dibujar las figuras mbs elaboradas pero merece la pena es- 
perar. Podemos obtener efectos interesantes cambiando la 
Ifnea 60 por: 


La siguiente rutina es una util herramienta para la depu- 
raci6n de programas, ya que lista las lineas en las que he- 
mos utilizado una determinada variable BASIC. 

Una (mediante MERGE) esta rutina con su programa y 
ejecutela con run 65350. Tambibn se puede utilizar como 
una subrutina cambiando los comandos END en las Ifneas 
65360, 65410 y 65440 por RETURN. 

La rutina pide el nombre de la variable y la linea por la 
que debe comenzar y acabar de inspeccionar el progra¬ 
ma. Si no introducimos ningun valor, la busqueda se efec- 
tua sobre todo el programa. Para cada linea en que se uti- 
liza la variable deseada obtenemos el numero de linea y 
las veces que se emplea. 

El programa realiza primero una serie de conversiones 
para adaptar el formato de entrada a la forma de manejar 
los nombres de variables del programa BASIC, y realiza a 
continuacibn una busqueda por todo el programa. Al nom¬ 
bre de variable que le demos se le pone a uno el bit 7 del 
ultimo carbcter, para indicar el fin. j. m. 


60 Q = (R-1)*COS(6-R) 
V pruebe tambibn: 


60 Q = (R-1 )*SIN(- 16*R) 

En la linea 10 estbn definidas las variables Xs y YS que 
controlan la definicibn del dibujo; ponga simplemente un 
numero menor para obtener puntos mbs juntos. XS = 1 y 
YS = 1 nos da la mayor definicion pero emplea consecuen- 
temente mayor tiempo en realizar el dibujo. Use XS = 6 y 
YS = 6 para obtener una rbpida idea de qub va a apare- 
cer con cada cambio. 

J. M. 


10 MODE 2:ORIGIN 320,200:xs=4:ys=4 
20 a=320:b=a#a:c=200 

30 FOR x=a TO 0 STEP -xs:s=x#x:p=SQR(b-s) 
40.FOR i=-p TO p STEP 6*ys 
50 r=S0R(s+i#i)/a 
60 q=ir-l)*SIN(16-r) 

70 y=i/3+q*c 

80 IF i=-p THEN m y.’GOTO 110 
90 IF y >m THEM m=-y:60T0 120 
100 IF y >=n THEN GOTO 130 

110 n=y 

120 PLOT -x,y:PLOT x,y 
130 NEXT:NEXT 
140 END 























MANEJO DIBECTO DEL CHIP 

DE SONIDO 


Muchos de los usuarios de Amstrad ya sabrbn que el 
controlador de sonido que incorpora, el AY-3-8912, es un 
chip muy popular, y que se utiliza en muchos ordenado 
res. Sin embargo, el manejo a travbs del BASIC y el ope¬ 
rative de su sonido se hace por una codificacibn interme¬ 
dia que dificulta el acceso directo a los registros internos. 

Aunque su programacibn directa puede llegar a ser te- 
diosa, nos proporciona la ventaja de poder estirar al llmite 
sus posibilidades. El programa que os presentamos a con 
tinuacibn crea el comando (RSX): SONIDO. Este comando 
tiene dos parbmetros: registro y valor. Su cometido es muy 
sencillo, pero no serb f&cil de usar sin saber el cometido 
de estos registros. Los tres ejemplos que lo acompanan 
ayudarbn a conseguir tres bonitos efectos sonoros siem- 
pre, claro estb, que antes se haya cargado el primer lista- 
do para definir el comando. 


10 REM 

20 REM COMANDO ISONIDO,RE3ISTRO,VALOR 
30 REM 

40 MEMORY 33999 

30 FOR a=3d000 TO 34036 

40 READ x:POKE a,x 

70 NEXT A 

SC CALL 34000:NEW 

90 DATA 33,228,132,1, 21S ,132,205,209,1SS 
,201,222,132,24,12,S3,79 

100 DATA 7S,73,43,207,232,144,218,132,0, 
0,221,126,0,79,221,126,2,205,32,139,201 


10 REM EXPLOSION 

20 ISONIDO,7,fcXIOl10111 

30 : SONIDO,e, 31:! SONIDO,6 ,120 

40 !SONIDO,11,4::SONIDO,12,90 

50 ISONIDO,13,0 

10 REM DISPAROS 
20 ISONIDO,7,WX10110111 
30 !SONIDO,8,31:'SONIDO,6,120 
40 (SONIDO,11,24:iSONIDO,12,10 
50 ISONIDO,13,8 

10 REM SI LB I DOS 

20 I SONIDO, 7,8.X10111110 

30 ISONIDO,8,15 

30 FOR A=25b TO 1 STEP -1:!SONIDO,0,A:NE 
XT A 

50 FOR A«1 TO 255: SONIDO, 0, A: NEXT A: ISO 
NIDO,7,255 


EL AMSTRAD ARCOIRIS 


5 MODE 0 

6 SYMBOL AFTER ifO 

10 SYMBOL 200,1 £ , 56 ,1 £ , 0,0 ,16 ,24 
20 SYMBOL 201,0,0,0,40,108,0,0,0 


tO SYMBOL 202 , 0,0 
,0 FOR x — 1 TO 20 
:0 PRINT CHRS (22 : 

“ W — w 

’0 PEN 1 
0 LOCATE k ,10 
?0 PRINT CHR*( 20 ( 
00 REN 2 
.10 LOCATE :>;, 1 0 
20 PRINT CHR$! 2 ( 
i 30 PEN 3 
40 LOCATE x ,10 . 
[50 PRINT CHR$( 2 t 
; 60 PRINT CHR *<23 
l 70 next x 


.0, 


-L- , 


;hps (l) 


l) 


Se puede crear un car&cter multicolor en el AMSTRAD 
CPC 464 usando el modo transparente (PRINT CHR $(22); 
CHR $(1). Fijando este modo en el ordenador e imprimien- 
do diferentes caracteres coloreados uno sobre otro, podre- 
mos crear caracteres repletos de colorido. 


FORMATO DE IMPRESION 
EN E L AMSTRAD _ 

Algunos lectores nos han escrito quejbndose del forma- 
to de impresibn del AMSTRAD y senalando que si una (ra¬ 
se va a sobrepasar el llmite derecho de la pantalla, se ge¬ 
nera un <RETORNO DE CARRO> y la frase «salta» a la 
Knea siguiente; 

10 MODE 1 

20 A $ /xstring $ (22,«X») 

30 PRINT A $; A $ 

Este ejemplo nos darb al ejecutarlo dos lineas separa- 
das de A $. Sin embargo, esto no es un error del BASIC, 
sino una caracterlstica intencional. Para evitar esto, en lu 
gar de PRINT utilice USING«&»; por ejemplo, cambie la l(- 
nea 30 por: 

30 PRINT USING «&»; A $; A $ 

y le imprimirb A $ dos veces en la misma linea. 

Ocurre exactamente igual con el comando LOCATE: 

30 LOCATE 30,1: PRINT A $ 

y le escribira A $ en la siguiente linea, mientras que 

30 LOCATE 30,1: PRINT USING «&»; A $ 

le product el resultado esperado. 

A continuacibn ofrecemos una forma de utilizar los c-bdi- 
gos ASCII menores de 32 directamente desde el teclado 
como caracteres. Teclee PRINT» y pulse [CTRL] y una le- 
tra y luego [ENTER]. Pruebe los siguientes ejemplos: 

PRINT «[CTRL] G» - produce un pitido. 

PRINT«[CTRL] DO» ■ nos da el modo cero. 

PRINT «[CTRL] 03» - nos da color rojo (si estamos en 
modo cero). 

Puede intentar poner esto en un programa de esta forma: 
10 MODE 0 

20 PRINT «[CTRL] Olaaaaa, 02bbbbb, O3cccco 

Este ejemplo producirb una linea multicolor de amarillo, 
cyan y rojo. 



























curso 


<te programaaon 




E l mes pasado aeababamos 
con un pequeno programa. 
En este segundo capi'tulo 
prepararemos un nuevo 
programa con el que, por un lado, 
aprenderemos nuevas instrueciones y 
por otro entraremos en contacto con al- 
gunos conceptos de programacidn. 
Algo que se mencionb en la primera 
parte fue que los programas se almace- 
naban en memoria. La memoria no 
s61o es el lugar donde se guardan los 
programas; tambien es posible «depo- 
sitar» listas de nombres o numeros, in- 
cluso el propio sistema tiene almacena- 
das gran cantidad de utiles en ella. 
Todo ello lo estudiaremos en detalle 
mds adelante. Por el momento, nos in- 
teresa saber cdmo observar el progra¬ 
ma que tenemos en memoria. Para 
ello, indicamos al AMSTRAD que nos 
proporcione un LISTado de las instruc- 
ciones que previamente hayamos intro- 
ducido. Una vez tecleado un programa, 
por ejemplo el del capltulo anterior, te- 
clearemos LIST y pulsaremos <EN¬ 
TERS Con ello visualizaremos el con- 
junto de instrueciones tecleadas orde- 
nadas por su numero. 

Si sdlo deseamos ver parte de esas 
instrueciones, el comando LIST permi- 



te seleccionar la parte buscada del lis- 
tado del programa. Basta indicarlo con 
un numero a continuacidn. Por ejem¬ 
plo: 



▼ 


LIST 10 


<ENTER> 

LIST 10-30 


<ENTER> 

LIST -20 


<ENTER> 

LIST 20- 


<ENTER> 


A 



El primer LIST soiicita que se liste 
unicamente la sentencia numero 10, el 
segundo listard las sentencias entre la 
10 y la 30 (ambas incluidas), la tercera 
saca un listado hasta la sentencia nu¬ 
mero 20 y, por ultimo, la cuarta Iista to- 
das las sentencias a partir de la nume¬ 
ro 20 hasta el final. La posibilidad de 
efectuar listados de programas permi- 
te, aparte de comprobar qu6 se ha es- 
crito, repasar los errores de conjunto y 
verificar la correccidn de la escritura. 

Supongamos que desea eliminar de 
la memoria el programa tecleado, es 
decir, aquello que NOSOTROS hemos 
ido almacenando. Si tecleamos NEW y 
despuds pulsamos <ENTER> todo 
cuanto hubiera almacenado en memo¬ 
ria desaparecerd. Asi, en el caso que vi- 
mos no ocurrirfa absolutamente nada al 
intentar ejecutar el programa. No con- 
viene hacer pruebas con el NEW des¬ 
puds de haberse pasado un par de flo¬ 
ras tecleando (los nervios de mucha 
gente no lo resisten). 

Continuemos con la programacidn. 
Un programa como el siguiente: 


T 

10 CLS 

20 PRINT “23” 

30 PRINT 

40 PRINT “NUMERO” 

A 


BASIC 

Cada vez que se ejecute escribe el nu¬ 
mero 23. Pero..., iy si desearamos im- 
primir en cada ocasidn un numero di- 
ferente? La solucidn es disponer de una 
especie de caja o recipientc donde de- 
positar el numero y que el programa 
imprimiera lo que encontrase en la caja 
en las sucesivas ejecuciones. Eso es una 
variable. No es mds que un lugar de la 
memoria del ordenador cuyo conteni- 
do no tiene por qud ser siempre el mis- 
rno, sino que varia a lo largo de la eje- 
cuci6n de un programa. Para trahajar 
con las variables ocurre al igual que con 
los buzones de correos: es necesario 
darles un nombre que permita su iden¬ 
tification diferenciandolas de las de- 
mas. 

Los nombres de las variables se for- 
man con letras y numeros, tenierido en 
cuenta que el primer caracter debe ser 
una letra. Suele ser recomendable que 
los nombres de las variables hagan alu- 
si6n a su significado real. Por ejemplo, 
si una variable contiene el precio del 
pan, un nombre significativo seria- 
preepan. 

No conviene tampoco aue los nom¬ 
bres scan demasiado largos ya que si 
son variables que deoen teclearse en 
multiples ocasiones, la introducciOn de 
los programas se vuelve farragosa y 
aburrida. 

Escribamos el siguiente programa: 


10 LET X=7 
20 LET Y=3*X 
30 PRINT Y 

A 


En £1 observamos varias cosas. En 
primer lugar aparece una nueva ins- 
truccidn: LET. La sentencia que inclu- 
ye LET se denomina sentencia de asig- 
nacion. Es usual traducir LET X=7 por 
«haz X igual a 7». Ello equivale a indi¬ 
car que se almacene en la «caja» con el 
nombre. X el numero 7. Dicho de ma- 
nera mas propia: asigna a la variable X 
el valor 7. Asl, mientras no aparezea 
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una nueva asignacidn para esta varia¬ 
ble, el ordenador interpreta que el va¬ 
lor de X es 7. La sentencia 20 asigna a 
la variable Y el valor 3 * 7 (es decir, 
21). La sentencia 30 indica at ordena¬ 
dor que escriba en la pantalla el valor 
de la variable Y, que no es Io mismo 
que la letra «y». En las sentencias de 
asignacidn, la variable que cambia de 
valor aparece situada a la izquierda del 
signo mientras que a la derecha 
puede aparecer un numero, una expre- 
sidn a calcular o simplemente otra va¬ 
riable. 

Es importante no identificar el signo 
“=” de las sentencias de asignacidn con 
el significado del signo matemdtico 
igual. Asi, por ejemplo, las sentencias: 


T 

10 LET X=7 
20 LET X=X+1 
30 PRINT X 

A 


tienen un significado muy claro en BA¬ 
SIC: 


▼ 

10 “haz que X valga 7” 

20 “haz que X valga el valor 
que tenia X mas uno” (ha- 
cer que X valga 7 + 1, es 
decir, 8) 

30 “escribe el valor de X” (es¬ 
cribe el numero 8) 

A 


mientras que matemiiticamente la 
ecuacion X=X + 1 carece de sentido. 
Asi pues, es importante concebir una 
variable como el nombre asignado a, 
una zona de memoria donde se alma- 
cena su valor. Por supuesto, esta zona 
de memoria fisica es unica, de forma 
que el ordenador una vez ej'ecutada la 
instruction de asignacidn (por ejemplo 



X=X + 1) se almacena el numero 8 ol- 
vidando (en realidad escribiendo enci- 
ma) el valor anterior. En la mayor par¬ 
te de los ordenadores, en concreto en 
el AMSTRAD, no es necesario teclear 
la palabra clave LET en las sentencias 
de asignacidn. Por ello, a partir de aho 
ra omitiremos su escritura. 

Resulta interesante observar cdmo 
en el ultimo programa seria de gran uti - 
lidad no tener que emplear una senten¬ 
cia de asignacidn para conseguir que la 
variable X tenga el valor 7, sino que el 
ordenador nos permitiera, durante la 
ejecucidn del programa, indi'car cuales 
ese valor. 

Esa es la misidn de la instruccidn IN¬ 
PUT. Cuando en un programa aparece 
esta instrueci6n, el ordenador se detie- 
nc esperando que se le comunique el 
valor que debe asignar a la variable. 
Asi la ejecucidn del sigutente progra¬ 
ma: 


T 


10 INPUT X 
20 Y=2*X 
30 PRINT, Y 
40 Y=3*X 
50 PRINT Y 


A 


seria: 

10 Aparece en la pantalla un signo, 
normalmente “?” y el cursor. Nosotros 
tecleamos un numero y pulsamos la te- 
cla <ENTER>. Con ello el AMS¬ 
TRAD asigna a la variable el numero 
tecleado. 

20 El ordenador asigna a la variable 
Y el valor de la expresidn 2*X, es de¬ 
cir, el doble del valor introducido en la 
sentencia anterior. 

30 Aparece en pantalla el valor de Y. 

40 Se la asigna a Y el valor de 3*X. 
Tdngase en cuenta que desaparece el 
valor que contenia Y. 

50 se escribe el nuevo valor de Y. 

Tratemos de escribir ahora un pro¬ 
grama con un significado claro. Toma- 
remos un ejemplo de la vida cotidiana. 
Varnos a realizar el calculo de gastos de 
una noche de fiesta. Primero calculare- 
mos el precio de la cena multiplicando 
el precio del menu por el numero de 
asistentes y despuds el coste de la sala 
de fiestas por un procedimiento similar. 

El programa quedaria asi: 
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T 

10 INPUT PRECMENU 
20 INPUT NUMASIST 
30 COSTECENA = PREC¬ 
MENU * NUMASIST 
40 INPUT PRECSALA 
SO COSTESALA = PREC¬ 
SALA * NUMASIST 

▲ 


y con ello el coste total resulta: 


▼ 

60 COSTOTAL = COSTE¬ 
CENA + COSTESALA 
70 PRINT COSTOTAL 

__ A 

Como se observe, seria de interbs po- 
der indicar cutil es el objetivo del pro- 
grama. La ventaja es que una persona 
que no haya escrito este programa po- 
dr<i identificar su cometido y sus partes 
sin dificultades. La instruccibn REM se 
usa con esta funcibn. Una sentencia en- 
cabezada por REM especifica al orde- 
nador que no debe interpretar esa sen¬ 
tencia. Es decir, esa linea figura en el 
programa eomo un simple comentario. 
Al pasar por ese numero de linea la eje¬ 
ction del programa la ignorarb. En 
nuestro ejemplo podriamos haber 
puesto: 

~ ' T 

5 REM PROGRAMA PARA 
CALCULAR GASTOS DE 
FIESTAS 

_A _ __ 

e incluso: 

▼ 

55 REM CALCULO DEL 
TOTAL 

A 


Ademas, el programa ejemplo tiene 
otro defecto importante. Durante su 
ejecucibn (comprueba el funciona- 
miento) la pantalla no nos ayuda en la 
interpretacibn de los dates. Si uno eje- 
cuta el programa y ve aparecer el signo 
“?” no sabra que debe introducir: el 
preeio de la cena o el numero de co- 
mensales. Para poder utilizar un pro¬ 
grama asi es imprescindible recordar el 
orden en que habian de ser introduci- 
dos los dates. En programas de mayor 
complejidad IJega un momento en que 
no es posible acordarsc dc que dato 
estti solicitando el ordenador. La forma 
de evitar tal desorganizacibn es simple. 
Un modo de hacerlo puede ser interca- 
lar (he aqui la ventaja dc haber nunie- 
rado de 10 en 10) entre cada solicitud 
de entrada de un dato una instruccion 
PRINT que indique el significado. 

En el ejemplo seria: 


T 

5 PRINT “INTRODUZCA 
EL PRECIO DEL MENU 
POR PERSONA” 

15 PRINT “INTRODUZCA 
EL NUMERO DE ASIS- 
TENTES” 

35 PRINT “INTRODUZCA 
EL PRECIO DE LA EN¬ 
TRADA A LA FIESTA” 
65 PRINT “EL COSTE TO¬ 
TAL DE LA NOCHE ES 
DE:” 

A 


El programa que resulta es m as fieri 
de comprender por quien lo ejecuta. 
De todas formas, es posible mejorar su 
estructura: 

La instruccibn PRINT permite la es- 
critura de textos y variables. Tambien 
permite escribir varios textos y varia¬ 
bles separando unos de otros mediante 
los signos y Cuando Se utiliza 
el punto y coma (;) la siguiente escritu- 
ra se realiza justo a continuacibn del ul¬ 
timo simbolo escrito, Cuando se escri¬ 
be un numero este aparece con un es- 
pacio a cada lado. As! el programa-. 


T 

100 a=7 
110 b=15 

120 PRINT “numeros” ; 
a;b,a; “fin” 

_A 

resulta (al ejecutarlo con RUN 100): 

T 

numeros 7 15 7 fin 

_ A 

Las distintas cadenas y variables se 
pueden separar tambien por el signo 
La linea de escritura del ordena¬ 
dor se divide en el AMSTRAD en tres 
sectores. El empleo de la coma (,) in- 
dica que la prbxima escritura se reali- 
zard en el siguiente sector. 

Como ejercicio para este mes vamos 
a dejar el repaso de todo lo visto y la 
realizacion de un programa que, ade- 
mbs de calcular el coste de esa noche, 
db una salida en pantalla de este estib: 

▼ 

COSTE DEL MENU 
1230 

COSTE DE LA SALA 
1000 

COSTE TOTAL = 6690 PTS 

NUMERO DE ASISTENTES 
3 

NUMERO DE ASISTENTES 
3 , 

COSTE DE LA CENA 
3690 

COSTE DE FIESTA 
3000 

A 

L uis Al varez 
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Editorial: Anaya Multimedia 
Pdginas: 270 


Libro: Inteligencia artificial: conceptos y programas. 
Autor: Tim Hartnell 


Todos hemos visto en al- 
guna pelfcula mbquinas-ro- 
bots-ordenadores pensan- 
tes, capaces de tomar de- 
cisiones inteligentes, o he¬ 
mos leido su descripcibn en 
mbs de una novela de cien- 
cia-ficcibn. Sabemos inclu- 
so que existen realmente 
ordenadores muy potentes, 
preparados para ayudar en 
diagnbsticos medicos, con¬ 
trol de procesos industria- 
les, navegacidn, etc., si 
bien sblo al alcance de 
cientfficos escogidos, que 
nuestra imaginacibn repre- 
senta enfundados en su ti- 
pica bata blanca. Ahora 
bien, pocos se atreverian a 
imaginar la «inteligencia ar¬ 
tificial dombsstica». 

Sin embargo, en un libro 
verdaderamente ameno, 
Tim Hartnell nos demuestra 
que es posible; y no sblo 
eso, sino que adembs nos 
ensena a que seamos no- 
sotros mismos los que de- 
sarrollemos nuestros pro- 
pios programas «inteligen- 
tes». Toda una aventura 
que llegarb a buen tbrmino 
si nos dejamos guiar por la 
mano firme y segura de 
esta excelente obra. 

Asi, entre otros, se nos 
presentan programas como 
SILOGISMOS, capaz como 
su nombre indica de seguir 
lineas deductivas totalmen- 
te al estilo de los antiguos 
fil6sofos griegos. O el caso 
de DOCTOR, una version 
BASIC del famoso ELIZA, 
que probablemente pueda 
ayudarle a resolver esos 
pequenos problemas ani- 
micos o psiquicos. Incluso 
podremos encontrar un 
programs que jugarb con 
nosotros de forma incansa- 


ble a un juego semejante a 
las damas, con la peculiari- 
dad de que el ordenador irb 
aprendiendo a medida que 
transcurran mbs y mbs par- 
tidas. Dentro de la linea de 
programas de juego, po¬ 
dremos tambibn disputar 
grandes partidas de 3 en 
Raya. Adembs se nos ofre- 
cen programas tales como 
un generadorde poemas, o 


Posiblemente usted, lec¬ 
tor, no conozca el tema, o 
tal vez piense que no le in- 
teresa. Pero seguro que al 
leerlo cambiarb de opinion, 
ya que la presentacibn de 
los diversos problemas 
planteados — razonamien- 
to humano, razonamiento 
simulado, programas de 
juegos inteligentes, siste- 
mas expertos, programas 


un sistema experto para 
elegir microprocesadores, 
o un programs que, si- 
guiendo nuestras brdenes, 
mueve objetos en un mun- 
do bidimensional e incluso 
un eficiente traductor in- 
glbs/espanol. 


que aprenden de sus erro- 
res, programas traductores 
—estb muy bien estructura- 
da, analizando los temas 
primeramente desde un 
punt) de vis fa tebrico, para 
pasar a continuacibn al es- 
tudio fragmentado del 


correspondiente programa- 
ejemplo propuesto por el 
autor. Dichos ejemplos es- 
tbn realizados en un BASIC 
estandard, facilmente 
adaptable a la mayorfa de 
los ordenadores dombsti- 
cos que se encuentran en 
el mercado. Incluso se ofre- 
ce al final un apbndice con 
los listados adaptados al 
ZX-Spectrum. 

La traduccibn es exce¬ 
lente, muy por encima de lo 
que es habitual en los libros 
sobre ordenadores dombs- 
ticos, y los programas son 
igualmente buenos, si bien 
el autor no cesa de invitar- 
nos a que investiguemos la 
forma de mejorarlos e in¬ 
cluso a que desarrollemos 
nuestros propios progra¬ 
mas. Para ese fin incluye 
un apendice con consejos 
muy utiles sobre el mbtodo 
a seguir en el desarrollo de 
un programa. 

Otro punto a destacar es 
la constante informacibn bi- 
bliogrbfica, de la cual en- 
contramos una recopilacibn 
en otro apbndice. Sin duda 
un elemento interesante 
para aquellos que deseen 
seguir investigando y pro- 
fundizando en este tema. 
Hemos de descubrirnos 
ante el notable esfuerzo 
realizado por el autor para 
documentarse adecuada- 
mente y poder incluso ofre- 
cer a los lectores opiniones 
contrastadas en temas tan 
conflictivos como la fronte- 
ra entre razonamiento e in¬ 
teligencia, o el problema de 
hasta dbnde se debe per 
miti'r llegar a las mbquinas 
en cuestiones de inteigen- 
cia. 
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Libro: Ordeno y Aprendo con AMSTRAD para EGB 
Autor: J. L. Carralero 


«Ordeno y Aprendo» 
es algo mbs que un cur- 
so de iniciacion al BASIC. 
Se trata de un libro capaz 
de ensenar a cualquiera 
el camino exacto para 
realizar un programa con 
bxito, incluso a los mas 
pequenos. La estrategia 
pedagogics es excelente, 
y sigue un modelo de 
aprendizaje configurado 
en dos apartados. 


Ordeno y 

Aprendo 



En primer lugar, se 
aborda el conocimiento 
necesario para la asimila- 
cibn de los conceptos bb- 
sicos y su aplicacibn en 
las tecnicas de trabajo, 
para continuar con el area 
practica, enfocada al do- 


AMSTkAu 

Pdf a jB 


minio y manejo del orde- 
nador mediante la utiliza- 
cibn del lenguaje BASIC 
de programacibn. Al final 


Editorial: INED, S. A. 
Piginas: 193 


de cada capftulo se inclu- 
ye una serie de preguntas 
para reafirmar los conoci- 
mientos adquiridos. 

El libro esta graciosa- 
mente ilustrado con tortu- 
gas semejantes a las del 
LOGO, que se encargan 
de representar en imbge- 
nes lo que el texto nos ex¬ 
plica con palabras. 

Al principio del libro se 
nos ofrece un resumen de 
la historia de la informbti- 
ca, asf como una primera 
aproximacibn al ordena- 
dor, el hardware y el soft¬ 
ware. A continuacibn se 
analiza el ordenador mbs 
en profundidad, especial- 


mente su estructura inter¬ 
na. Simultbneamente se 
empieza con los coman- 
dos BASIC. 

Ahora nos encontra- 
mos con los sistemas de 
numeracibn, cambios de 
base, las variables, las 
constantes, el tratamiento 
de la informacibn. Y tam- 
bibn, cbmo no, los organi- 
gramas, las bifurcaciones 
y las variables de control. 

Por ultimo, se analiza el 
uso de los bucles, las ins- 
trucciones FOR... NEXT, 
las instrucciones READ y 
DATA, el comando EDIT, 
y los poderosos AUTO y 
RENUM. Y como colofbn, 
se explica la utilizacibn y 
dimensionado de tabl 



Libro: «C6digo mbquina para principiantes con AMSTRAO Editorial: Indescomp 

Autor: Steve Kramer Pbginas: 175 


Este libro va dirigido al 
principiante que desea 
aprender a programar en 
cbdigo maquina en el 
AMSTRAD CPC464. En 
primer lugar se apuntan 
unas breves nociones 
elementales sobre nume¬ 
racibn binaria y hexadeci¬ 
mal. los cbdigos ASCII y 
una primera aproxima- 
cibn al lenguaje ensam- 
blador. 

A continuacibn se expli¬ 
ca lo que es un diagrama 
de flujo y los slmbolos 
mas utilizados. 

A partir de este mo- 
mento nos introducimos 
en el mundo fascinante 
del Z80. Empezamos con 
los registros y las instruc¬ 
ciones que permiten mo¬ 
ver informacibn de un re- 
gistro a otro. Se analiza 
cada instruccibn y, en los 
casos en que es posible, 
se muestra el paralelismo 
existente con el lenguaje 
BASIC. 

Pasamos ahora al Con- 
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tador de Programa (regis 
tro PC), y su manejo por 
medio de las instruccio¬ 
nes CALL y JP. Tambibn 
se explica en esta sec- 
cibn el manejo del 
STACK realizado por las 
instrucciones CALL. 

Abordamos despubs 
las instrucciones aritmbti- 
cas del Z80, tales como 
IND, DEC, SUB, SBC, 
ADD, ADC, asi como la 
explicacibn de conceptos 
como el de acarreo. In- 
mediatamente despubs 
se explica el registro de 
indicadores (flags) y su 
relacibn con las instruc¬ 
ciones anteriores y con 
otras como CP y los sal 
tos condicionales, tanto 
relatives como absolutes. 
Se incluyen tambien aquf 
las instrucciones CCF y 
SCF. 

Continuamos con las 
operaciones Ibgicas 
(AND, OR, XOR, CPL y 
NEG), y con un anblisis 
mas detallado de la utili¬ 



zacibn del STACK me¬ 
diante las instrucciones 
PUSH y POP. 

Llegados a este punto 
nos sumergimos de cabe- 
za en el nutrido grupo de 
instrucciones de rotacibn: 
RL, RLA, RLC, RLCA, 
RLD, SLA, RR, RRA. 
RRC, RRCA, RRD, SRA, 
SRL. Nos habla tambien 
de sus efectos en los 


flags y su aplicacion para 
operaciones en matemb- 
tica binaria. 

Por ultimo, las instruc¬ 
ciones de carga LDD, 
LDDR, CPD, CPDR, LDI, 
LOIR, CPI, CPIR, y las 
instrucciones de entrada 
y salida IN y OUT. 

Un ultimo apartado se 
refiere a las instrucciones 
menos frecuentes, como 
las de interrupciones y 
entrada-salida de cade- 
na. Habla tambibn en 
este apartado de los res¬ 
tarts y los modos de di- 
reccionamiento. 

El final del libro estb 
constituido por una breve 
referencia al modo de uti¬ 
lizer las rutinas del Siste- 
ma Operativo (tal vez de- 
masiado breve) y una se¬ 
rie de apendices (tablas 
de instrucciones del Z80, 
conversibn hexadecimal- 
decimal, mapa de panta- 
lla del AMSTRAD y direc- 
ciones de algunas rutinas 
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Estimados amigos: 

Soy un suscriptor de esta ma- 
ravillosa revista y desea ia que 
me aclarasen un probiema que 
no permite la ejecucibn de un 
programa que presentaron en su 
revista. Me refiero al conocido 
juego de la rana del que ofrecie- 
ron un listado en el numero 2 de 
su revista perteneciente al mes 
de noviembre de 1985. 

Despubs de haber copiado el 
programa, me dispuse a ejecu- 
tarlo mediante la orden RUN y e! 
ordenador emitib el siguiente 
mensaje de error: 

UNKNOWN COMMAND IN 470 

El listado de la linea 470 es el 
siguiente: 

470 !RSCR1,5,6,11,12,9,10,9,10: 
LSCR1,7,8: |RSCR2,15,16,17,18: 
LSCR2,21,22,19,20,19,20. 

El mencionado error viene a 
decir que el BASIC no encuentra 
un comando externo que corres- 
ponde a lo escrito tras el simbo- 
lo ‘ ’ (segun la definicibn del li- 
bro del usuario). 

Les advierto que el juego sale 
normalmente (todo funciona 
correctamente) hasta que pulso 
la tecla [J] (para Jugar). Enton- 
ces aparecen los dibujos gene- 
rales en la pantalla e, inmediata- 
mente despues, el mencionado 
error que interrumpe la ejecu¬ 
cibn. Tambibn deseo advertirles 
que poseo un CPC-664 y el pro¬ 
biema puede venir dado por la 
incompatibilidad del programa. 

Asi pues, me gustaria que me 
dieran una solucibn precisa al 
probiema pues me gustaria te- 
ner el emocionante juego a mi 
alcance. 

Quisiera tambibn que intenta- 
ran solucionar lo que creo que 
es un fallo del ordenador. Este 
probiema viene dado por la apa- 
ricibn del mensaje SINTAX 
ERROR IN (linea x) cada vez que 
el ordenador encuentra en la li¬ 
nea x la orden DEFINIT a-z. 


Cuando ocurre esto cambio la 
orden DEFINIT por la de DE- 
FREAL con lo cual el programa 
sigue su curso aunque querria 
saber si esto perjudica o no su 
ejecucibn. 

Con las gracias anticipadas se 
despide un lector y seguidor de 
su revista que les felicita por su 
trabajo. 

Muy cordialmente, 

Pere Juanola Gonzalez 
Roses (Gerona) 


En lo referente al programa ‘la 
rana', el probiema es el siguiente: 

Los comandos RSX (o lo que es 
lo mismo, los comandos precedi 
dos por el simbolo *|' no son ni mas 
ni menos que rutinas en cbdigo 
maquina, a las que se da un nom- 
bre mediante una tabla de nom- 
bres y, utilizando una rutina del sis- 
tema operativo, se informa al BA¬ 
SIC de que dichos comandos y di- 
cha tabla de nombres, se produce 
el citado mensaje de error, ya que 
no encuentra el nombre que bus- 
ca. 

Efectivarnente, segun el texto de 
su carta, la linea 470 esta bien es- 
crita, por lo que el fallo habra que 
buscarlo en la tabla de nombres. 
i,V donde esta esta famosa tabla? 

Bien, analicemos la situacion. 
Tanto las rutinas en maquina (que 
constituyen los comandos RSX) 
como la tabla de saltos y la llama- 
da a la rutina del sistema operati¬ 
vo para inicializar dicha tabla se 
encuentran en los DATAS del pro¬ 
grama en BASIC. Asi, probable- 
mente el error se encuentre en al- 
guno de estos datos, y mas con- 
cretamente en los referentes a la 
tabla de saltos. Por tanto, solo res- 
ta aconsejarle que revise cuidado- 
samente el contenido de las lineas 
3260 a 3290, arnbas incluidas, ya 
que probablemente este ahi el fa 
llo. 

En cuanto a su segunda pregun- 


ta, la solucibn es muy simple: bas- 
ta con sustituir el nombre incorrec- 
to del comando (DEFINIT) por el 
nombre correcto (DEFINT) y todo 
resuelto. 

Somos dos lectores de su re¬ 
vista, que por cierto nos gusta 
mucho, y referente al articulo 
que publicaron en el numero 3 
de su revisrta sobre el juego 
«Knight Lore» y los posibles 
cambios que en el se pueden ha- 
cer (vidas infinitas, tiempo infi- 
nito, cambio de objetos, etc.) de- 
seariamos que nos lo enviasen 
o lo publicasen en la seccion de 
correo con mas claridad. 

Alberto y Antonio 
Valencia 


En la pagina 30 del numero 3 de 
nuestra revista aparecen dos lista- 
dos en BASIC. El primero de ellos 
permite, siguiendo las instruccio- 
nes del texto del articulo, cambiar 
el numero de objetos necesarios 
para completar el juego. el nume¬ 
ro de vidas y el tiempo disponible. 
El segundo permite cambiar los 
objetos que aparecen en la habita- 
cion cero y, leyendo atentamente 
el texto, veran que no es dificil mo- 
dificarlo para cambiar otra habi- 
tacibn. 

Si su pregunta se refiere a si po- 
demos publicar el Knight Lore 
mismo, no es posible, ya que se 
trata de un juego comercial, prote- 
gido por derechos de autor y co- 
mercializado en Espana. El juego 
en si debe ser comprado en algu- 
na tienda especializada. Si pudie- 
ramos lo publicariamos, pero a la 
gente de Ultimate no le iba a sen- 
tar muy bien. Lo que pretende el 
articulo es facilitar el recorrido del 
juego y hacer que llegar al final sea 
accesible a los mortales. 
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lo que hay que saber... 


* <,Que capacidad 
maxima tiene el pro- 
grama AMSFILE? 

— En el folleto de intrucciones se 
explican los mbximos datos que 
puede manejar dicho programa. 
Los datos correctos son: 

9.999 fichas en total en un fi- 
chero. 

60 caracteres como maximo en 
un campo. 

20 campos en una ficha. 

1.200 caracteres en total en una 
ficha. 

Esto significa que las mbximas ca- 
pacidades que el programa puede usar 
internamente son esas. Pero no quie- 
re decir que se puedan usar todas las 
capacidades a la vez, debido a las li- 
mitaciones de los medios de almace- 
namiento (base discos). Es decir, se¬ 
gun lo anterior, la longitud maxima que 
podri'a tener un fichero manejado por 
AMSFILE serla: 

9.999 fichas x 1.200 caracte¬ 
res = 11.998.800 numero total de ca¬ 
racteres. 

O lo que es lo mismo 11.717Ks, o al- 
rededor de 11 Megabytes. Como se 
puede ver estas capacidades desbor- 
dan por complete la capacidad que po- 
seen actualmente los Amstrad de la 
familia CPC, e incluso, la del nuevo 
PCW8256. Para manejar esa cantidad 
de datos se necesitaria un disco duro, 
lo que, segun nuestras noticias, toda- 
via no esta disponible para los ordena- 
dores Amstrad. 

Para hallar la longitud maxima que 
puede tener un fichero concreto se si- 
gue el metodo siguiente: Dividir la ca¬ 
pacidad libre que tenemos en un disco 
entre el numero de caracteres de la fi¬ 
cha que hemos definido. El resultado 
es el numero maximo de fichas. 

La capacidad libre son 169Ks con 
formato sistema (que exige Amsfile). 
Ademas de esto hay que tener en 
cuenta si se trabaja con dos unidades 
de disco o con una, ya que si se da 
esta ultima condicion, hay que descon- 
tar lo que ocupan los programas de 
Amsfile (en conjunto, 43Ks), ya que es- 
tos deben ser siempre accesibles (con 
dos unidades se puede dejar una uni- 
dad entera para el fichero —el drive 
B— y tener el programa en la otra). A 
ambas capacidades hay que descon- 


tar un maximo de 3Ks, que ocupan los 
ficheros auxiliares de definiciones y de 
numero de datos. Resumiendo, con 
dos unidades tenemos libres 166Ks 
(169-3) y con una, 123Ks (169-43-3). 

P.e. El maximo numero de fichas 
que se puede manejar con una ficha 
de 100 caracteres es la siguiente: 

— Una unidad: 

123*1024/100 = 1259 fichas. 

— Dos unidades: 

166*1024/100 = 1700 fichas. 


* iQue tengo que hacer 
para tener una copia de 
Amsfile en disco? 

Para obtener una copia de AMSFI¬ 
LE en disco, el proceso mas rapido es 
este: 

1. Hacer una copia del disco-rega- 
lo con ayuda de los comandos ‘COPY- 
DISC (si dispone de 2 unidades de 
disco) o ‘DISCCOPY’ (si solo dispone 
de una), para el 664 o el comando 
DISCKIT3' para el 6128. 

Para ello, introduzca el disco de 
CP/M en la unidad A; teclee ICPM y 
pulse ENTER. 

Una vez que aparezea la divisa de 
CP/M, A>, teclee COPYDISC, DISC- 
COPY o DISCKIT3 (segun sea el nu¬ 
mero de unidades y la version de 
CP/M) y proceda como le indica la 
pantalla. 

2. Una vez terminado este proce¬ 
so, dispongase a borrar todos los pro¬ 
gramas que no le son necesarios: para 
verbs teclee DIR, habiendo introduci- 
do previamente la copia realizada en 
la unidad A. 

De los programas que aparecen en 
pantalla, debe borrar todos EXCEPTO: 
BRUN.COM, AMSFILE.COM, AMSFI- 
LE2.COM, RGOAD.COM. 

Para borrar, teclee: ERA nombre- 
de-programa.extension. 

Por ejemplo, ERA EAMS- 
WORD.BAS [ENTER] 

o ERA *, BIN [ENTER] 

El otro metodo es hacer una copia 
de solo los ficheros terminados en la 
extension .COM, haciendo uso del pro¬ 
grama FILECOPY o PIP, segun la ver¬ 
sion de CP/M. 

Una vez hecho esto, hay que ejecu- 
tar los programas SYSGEN y BOOT- 
GEN de CP/M 2.2, en los que sera el 
disco fuente (source) el original de re- 


galo y el destino (destination) la copia 
realizada. La finalidad de estos progra¬ 
mas es copiar el sistema operative en 
las dos primeras pistas y generar el 
programa de arranque. 


* ^Que significa tta pre- 
gunta, en la opcion ‘Sa- 
lidas por Impresora’, 
INTRODUZCA CODI- 
GOS DE IMFRF- 
SION...? 


Esto se refiere a los cbdigos de con¬ 
trol de la impresora que se envfan para 
que esta tome determinadas acciones, 
generalmente se utilizan para poder 
escribir en distintos tipos de letra. Por 
ejemplo, para listados de anchura su¬ 
perior a 80 caracteres, quizb se desee 
mandar el cbdigo correspondiente a 
escritura comprimida, que permite es¬ 
cribir hasta 132 caracteres (general¬ 
mente el 15). O listados en letra de alta 
calidad (normalmente 27, 120, 1), etc. 
Para mayor informacion, consulte el 
manual de su impresora. 

Si no se desea ningun tipo de letra 
especial, simplemente pulse ENTER, y 
volverb al menu 'Salidas por Impreso¬ 
ra'. Si desea mandar algun cbdigo de 
control a la impresora, debe compro- 
bar la secuencia correcta en su impre¬ 
sora, teniendo en cuenta que bstos 
pueden ser de uno a tres caracteres y 
que la ultima vez debe pulsar ENTER, 
sin haber tecleado nada. Veamos dos 
ejemplos. 

Supongamos que desea mandar el 
cbdigo de comprimido, y que bste 
corresponde en su impresora al 15 
(decimal). Teclearia: 

15 [ENTER] [ENTER] 

Si deseara mandar los cbdigos de 
alta calidad, suponiendo que su impre¬ 
sora tuviera esa posibilidad y que 
correspondieran A ESC x + 1, lo que 
deberia teclear seria 27 (cbdigo que 
corresponde a ESC), 120 (cbdigo de la 
‘x’), sequido de 1. Es decir: 

27 [ENTER] 120 [ENTER] 1 [EN¬ 
TER] [ENTER] 

Observe que para salir siempre se 
pulsa ENTER sin haber tecleado nin¬ 
gun caraeter, lo que le indica al progra¬ 
ma que queremos abandonar la op- 

CIOn - M. A. BARRIOS 


98 / Amstrad User 


















(CJUMTTti 

1300. 


rats (osarn) 

1.900. 


nut (£«*"*> 

1.900; 


m (ouRna 

1 . 100 ; 


r.«i. (osarn) 

1300; 


tm (asstm) 

1 . 100 ; 


rv.r (cjasnTt) 

2JOO. 


nut toustni) 

1.900; 


Rv.it ttMsn-in 

1.900; 


nut (Ofssns) 

1.900; 


MONITOR 

(OWCOWAQUINA 


3 D VOICE 
CHESS 


CONTABIUWp 


f ON TROT DC STOCKS 


BASE D€ DATOS 


m 


464 

i 

NTEL 

*• •If 1 

UEGOSOE 

I0ENCIA2 


ACE 


DISTRIBUCION 


fctividades Comerciales Electronicas, S.A. 

Tarragona, 112 Tel. 3251512 ' Telex 93133 ACEE E 08015 Barcelona 


YA DISPONIBLE EN 


.. Y EN 

TICMniAC CCDC 


Y EN TODAS LAS 
TIENDAS ESPECIAU2ADAS 
























/ 



1 1 tibase 3 


dcturacicn 


Gestion de Empress 


Nominas 


Contabilidad 


Agenda Robot 


TODAVIA 
MAS FACIL 


RPA Systems Inc. te ofrece una amplia gama de programas, hasta 34. 
para que tu gestidn sea mas raplda y eficaz. 

Programasmuytecilesdeusar,conun lenguaje compilado de alto 
nlvel y continues ayudas en pantalla. 

Por eso, si eres pequeno empresarto, comerctante o profeslonal 
liberal, ahora lo times lodavia mas ticll”. 

De venta en los principals almacenes y en tlendas especlalizadas. 

Pidenos Informacldn sin compromlso, tu pnmera sorpresa sera su 
preclo. 


KHft ■>^anr» iru 

Olsldbuldb/exciushro en Etpaha 

GaMeo. 25. Entreptanta A. Tala. 447 9751 9S 09.29015 Madrid. 

Dlatribuktor exclusive err Catalunya: fiCE DISTRIBUCION, S.A 
Tarragona. 112. Tel. (93) 325 15 12.0S015 Barcelona 
Telex-93133 ACEEE 



